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Capitolo 1 


Introduzione 


AutoLISP® è un'implementazione dei linguaggio di programmazione LISP integrata nei pacchetto 
ADE-3 di AutoCAD®. AutoLISP permette agli utenti e ai programmatori di AutoCAD di 
scrivere macroprogrammi e funzioni in un linguaggio potente e perfettamente idoneo alle 
applicazioni grafiche. LISP è molto flessibile. facile da imparare e da utilizzare. 


AVVISO 


Per lavorare efficientemente con AuOCAD non è indispensabile 
imparare ad usare AutoLISP: se non avete esperienza nella 
programmazione. vi consigliamo di leggere solo le indicazioni 
riportate nel Capitolo 2 concernenti l'installazione di AutoLISP. 
poiché vi permetteranno di sfruttare numerosi memi e applicazioni 
di AutoCAD che richiedono AuoLISP. 


Se invece vi piace nrogrammare. la lettura di questo manuale vi 
sarà d'aiuto nell'usare AutoLISP per trasformare il programma 
“general purpose” AuoCAD in un programma ancora più potente in 
grado di assistervi nel vostro campo specifico. 


Questo rascicolo è un manuale di consultazione, non è una presentazione di LISP e quindi non si 
presta allo studio di questo linguaggio di programmazione. Per acquisire le conoscenze 
fondamentali richieste dalla programmazione in LISP, consigliamo la lettura di testi introduttivi 
e didattici dei quali vi proponiamo tre libri in italiano e tre in inglese, rispettivamente: 


LISP - Linguaggio e metodologia di programmazione di G. Gini. M. Gini e G. Guida. Edizione 
clup, Milano 1981 


Introduzione al Lisp di Ken Tracton, tradotto dall'ingiese. Padova 1984 
LISP - il linguaggio dell'inteiligenza artificicie di A.A. Berk, tradotto dall'inglese. Milano 1985 
I libri in inglese consigliati sono: 


LISP - A gentite introduction to svmbolic computation, di David S. Touretzky, Ed. Harper £& 
Row, New York 1984 


LISP di Winston e Horn (seconda edizione) e Looking a: LISP di T. Hasemer. entrambi 
pubblicati da Addison Weseley. 


Il LISP è un linguaggio con diversi dialetti. fra i quali MacLISP. InterLISP, ZetaLISP e Common 
LISP. La sintassi e le convenzioni adottate da AutoLISP si avvicinano a quelle del Common 
LISP, ma AutoLISP possiede diverse funzioni addizionali concepite appositamente per 
AutoCAD. Questo manuale presenta tutte le funzioni di AutoLISP e ne spiega il funzionamento 
e l'impiego. 


AutoLISP - (1) Introduzione 


11 Pershè LISPI 
Abbiamo scelto LISP come principale linguaggio di interfaccia 
gagioni: 


m LISP è particolamente efficiente nella gestione di oggetti € 
diverse dimensioni, il tipo di informazioni cioè con il av 
sistemi di CAD. 


Un interprete di LISP si adatta perfettamente all'ir 
caratterizza ì procedimenti di design. 


LISP è tra i linguaggi di programmazione più semplici d: 
 LISP è il linguaggio scelto per la ricerca e 10 svilu 
artificiale € dei sistemi esperto. 


Data la semplicità della sintassi in LISP, un interprete 


da impiementare © di dimensioni limitate. 


In futuro abbiamo intenzione di aggiungere al linguaggio LIS. 
Autodesk intende comuDQUE lavorare a lunga scadenza COn 
implementati saranno introdotti come alternative in aggiunta ac 


2 i gi 
AutoLISP fa uso dei seguenti tipi di dati: 


- liste 

- simboli 

- stringhe 

- numeri reali 

- numeri interi 

- descrittori di file 

- “nomi” di entità autoCAD 

- gruppi di selezione autoCAD 
- subrs (funzioni predefinite) 


Sui sistemi PC-DOS/MS-DOS. gli interi sono numeri 
compresi tra -32768 e +32767. Sulle stazioni di lavoro 2 
numeri a 32 Dit provvisti di segno Con valori oscillanu da 
interi trasferibili tra AutoLISP € AutoCAD sono limitati 2 


(dI 
è 


1 pumeri reali sono memorizzati in doppia precisione © 
cifre signif' icative di precisione. Le stringhe possono aver? 
che richiedono viene loro assegnata dinamicamente. 
comunque superare i 100 caratteri. 


AuwoLISP comprende una serie di funzioni incorpora: 
programmazione di applicazioni grafiche bidimensionali 2 
coordinate dei punti. OCCOITe ricordare le seguenti CONVer: 


ver numerose 


«i in gruppi di 
nte lavorano i 


strutturata che 


dell'intelligenza 
amente semplice 


» applicative. La 
nuovi linguaggi 


:ti di segno. quindi 
i autoLISP saranno 
= 2.147.483.647. Gli 


rorniscono almeno 14 
qualsiasi e la memoria 
stringe non devono 


sno una base Per la 
‘i. Per lavorare con le 


| 
O 
I 
| 
if 
| 
| 
| 
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I punti a 2D vengono espessi in forma di liste di due numeri reali (X Y), es. 
(3.4 7.52) 

Il primo valore corrisponde alla coordinata X, il secondo alla Y. 

I punti a 3D vengono espressi in forma di liste di tre numeri reati (X Y Z), es; 


(3.4 7.52 1.0) 
Il primo valore corrisponde alla coordinata X, il secondo alla Y e il terzo valore è quello della Z. 


Nei casi in cui AutoCAD richiede l'immissione di un certo tipo di dati (ad esempio un punto o 
un fattore scalare), per fornire il valore desiderato si puo impiegare un'espressione AutoLISP di 
questo tipo oppure una funzione AutoLISP che produca il tipo di valori desiderato. 


1 Ipr ma di val i U 


Alla base di ogni interprete LISP c'è il programma di valutazione. Questo programma esamina 
ogni riga inserita dall'utente, la valuta e ne restituisce come risultato il valore. Il procedimento 
di valutazione in AutoLISP opera nel modo seguente: 


= I numeri interi, quelli reali, le stringhe, i puatatori di file e le subrs restituiscono il 
proprio valore come risultato. 


= I simboli danno come risultato il valore a loro associato al momento della valutazione. 


= Le liste vengono valutate secondo il primo elemento della lista. Se il primo elemento da 
come risultato: 


- una lista (o NIL), la lista è interpretata come definizione di funzione e la 
funzione viene valutata usando i valori degli altri elementi della lista come 
argomenti. 


- il nome di una funzione predefinita (suor), gli altri elementi della lista vengono 
considerati come argomenti della subr e sono valutati da questa. 


Se si immette un'espressione AutoLISP in risposta a un messaggio di richiesta "Comando:" ci 
AutoCAD, AutoLISP valuta l’espressione e visualizza il risultato ottenuto, dopodiché riappare il 
messaggio “Comando:”. Per la visualizzazione di numeri reali, AutoLISP fornisce fino a 6 ciîre 


significative, 
Se è stata digitata o letta da un file un'espressione sbagliata. AutoLISP visualizza: 


n> 


in cui n è un intero che indica ii numero di parentesi di chiusura che mancano per completare 
l’espressione. Quando appare questo messaggio, bisogna fornire il numero di parentesi mancanti 
per ovviare all'errore. Un errore molto comune è Quello di dimenticare le virgolette di chiusura 
(") di una stringa di testo, nel quali caso le parentesi di chiusura verranno interpretate senza 
essere valutate e non serviranno quindi a modificare l'espressione. Per correggere questo errore 
occorre digitare le virgolette seguire da » parentesi di chiusura, 
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LA Convenzioni di AvtoLISP 


Le espressioni di AutoLISP possono essere digitate dalla tastiera mentre si utilizza autoCAD, 
possono essere lette a partire da UD file ASCII o da un variabile in forma di stringa. In ogni 


caso bisogna tener conto delle convenzioni seguenll 


s lnomidi simboli possono essere formati da una sequenza qualsiasi di caratteri stampabili 
ad eccezione di 


( ) x vu H 


w ) seguenti caratteri Vanno posti alla fine di un nome di sim 
numerica. 


bolo o di una costante 


{)'ni (spazio vuoto) (fine di linea) 


» le espressioni possono protrarsi per parecchie righe. 


« Molti spazi vuoti tra un simbolo € l'altro equivalgono sempre ad uno spazio solo. Non è 
obbligatorio rientrare i capoversi, si può comunque farlo per dare più rilievo alla 


struttura della f unzione. 


« 1 nomi dei simboli e delle subrs possono essere indifferentemente in maiuscolo 0 in 
minuscolo. 1 nomi di simboli non possono iniziare con una cifra. 


@ Le costanti intere possono avere il prefisso opzionale "+" 0 «.*. I numeri interi sono 
compresi fra -32768 e + 32767. 


@ Le costanti reali consistono di una 0 più cifre seguite da un punto decimale. seguito 2 
sua volta da una © più cifre, per esempio ".<" non viene identificato come numero reale. 
*0.4" invece si. Lo stesso vale, 20 esempio, per "5°, che non è considerato come numero 

reale. mentre "<.0" si. 1 numeri reali possono anche essere rappresentati in notazione 
scientifica, nel qual caso contengono una "e" 0 "E" opzionale seguita dall'esponente del 


numero. 
« Le stringhe di testo sono sequenze di caratteri racchiuse da virgolette. La barra 


rovesciata (il carattere \). usata all'interno di stringhe, permette di includere caratteri di 
controllo. 1 codici riconosciuti sono: 


XI corrisponde al carattere na 

\e corrisponde 2 "escape" (cambiamento di codice) 
Nn corrisponde a "newline" (2 capo) 

NT corrisponde 2 *return* 0 "enter" 

\t corrisponde 2 “tab” (tabulatore) 





\nnn corrisponde al carattere il cui codice otrale È nnn 


« La stringa Seguente produrrebbe. ad esempio, UD messaggio posto a capo e in principio 
di riga. 


(prompt "\ninserisci 33 primo punto: n) 
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= Il carattere ('), I° apostrofo, può essere usato come abbreviazione della funzione QUOTE. 
Quindi: 


' f00 
equivale a: 
(quote foo) 


s Nei programmi AutoLISP caricati da file su disco si possono includere commenti. I 
commenti sono preceduti da un punto e virgola, e continuano fino al termine della riga. 


Esempio: 
? Questa riga è un commento 


(setq area (* pi r r)) : Calcola l'area del cerchio 


1 nvenzioni di manyal 
Nella descrizione delle funzioni di AutoLISP useremo alcune convenzioni. Esempio: 
(moo <stringa> <numero>...) 


Il nome della funzione è mostrato così come deve essere digitato. Gli elementi racchiusi fra le 
parentesi "<>" che seguono il nome della funzione indicano il numero e il tipo di argomenti 
richiesti dalla funzione. In questo esempio, la funzione “moo” ha due argomenti richiesti: una 
stringa e un numero. I puntini stanno ad indicare che possono essere aggiunti altri argomenti 
numerici. E° importante notare che si devono omettere le parentesi "<>" e i puntini quando si 


digita l'espressione. 
Seguono esempi validi per la funzione "moo" (premesso il formato di richiamo appena descritto): 


(moo "Ciao" 5) 
(meo "Grazie" 1 2 3) 


Gli esempi che seguono invece, darebbero luogo a condizioni di errore. dato che non sono 
conformi al formato prescritto: 


(moo 1 2 3) (il primo argomento deve essere una stringa) 

(moo "Ciao") (uno degli argomenti deve essere numerico) 

(moo "eseguire" '(1 2)) (il secondo argomento deve essere un numero. non 
una lista) 


Quando un argomento opzionale può figurare una volta ma non puo essere ripetuto, esso viene 
racchiuso fra parentesi quadre ("[]"), come in: 


(foo <stringa> [<numero>])} 
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In questo caso la funzione "foo" richiede un argomento stringa © accetta un argomento numerico 
opzionale. Ad esempio, i seguenti richiami della funzione "foo” sono corretti: 


{foo “carica") 
(£o00 vcarica"” 22) 


Gli esempi seguenti invece non rispettano il formato prescritto € darebbero luogo ad errori: 


(foo 44 13) (il primo argomento deve essere uno stringa) 
(f£00 “prego” 44 23) (troppi argomenti) 
1,6 Gestione derli errori 


Se AutoLISP incontra un errore durante il processo di valutazione, appare Un messaggio del tipo: 
error. lesio 


dove "resto" è il messaggio di errore. Se è definita la funzione *ERROR® (diversa da NIL). 
AutoLISP, invece di visualizzare il messaggio, esegue Questa funzione (con “lesio" come unico 
argomento). Se *ERROR®* non è definita o ha valore NIL, il processo di valutazione di 
AutoLISP si arresta € viene visualizzata la traccia della funzione richiamata fino a 100 livelli di 
profondità. 








Capitolo 2 
Installazione di AutoLISP 


2.1 Formato di release 


AutoLISP è contenuto in ogni copia di AutoCAD che inciude ADE-3. Sotto PC-DOS/MS-DOS 
il file di sovrapposizione per il programma AutoLISP si chiama “acadl.ovi" ed è contenuto in uno 
dei dischetti programma di AutoCAD. Sotto altri sistemi il file si chiama "acadl”. 


Uno dei dischetti programma di AutoCAD contiene il file "readme.doc" che riporta le ultime 
modifiche ed eventuali aggiornamenti aggiunti in AutoCAD e AutoLISP; assicuratevi di aver 
letto questo file prima di iniziare a lavorare. 


Su sistemi PC-DOS/MS-DOS viene fornita una versione 
addizionale di AutoLISP. chiamata AutoLISP Esteso, consistenie 
dei file “"acadix.ovi”, "exitisp.exe° e "remiisp.exe°. Rimandiamo ci 
capitoletti seguenti per ulteriori informazioni. 


L2 Au normal 


I punti seguenti riguardano solo i sistemi che non utilizzano AutoLISP Esteso. Per lanciare 
AutoLISP Versione 10 bisogna avere a disposizione: 


a Un computer gestito da AutoCAD con una memoria di almeno 640 Kbytes e un disco 
rigido. 


=» Una versione compatibile di AutoCAD comprendente ADE-3. 


Lal Confi jon 

Quando si configura AutoCAD, uno dei parametri operativi da definire riguarca l'utilizzo 0 
meno di AutoLISP. Sotto PC-DOS/MS-DOS. il Configuratore presenta un ulteriore messaggio 
che domanda se si vuole utilizzare AutoLISP Esteso. Per utilizzare solo AutoLiSP normale. 
occorre rispondere "no". Rimandiamo alla AwoCAD Installation and Performance Guide per 
ulteriori dettagli. 


La Variabili d* 


Sotto PC-DOS/MS-DOS, una certa quantità della memoria del computer deve essere riservata ad 
AutoLISP. Se utilizzate un pacchetto applicativo come AutoCAD AEC, consultate il relativo 
manuale per verificare l'impostazione da dare alle variabili d'ambiente LISPHEAP e 
LISPSTACK. Rimandiamo alla AutoCAD Installation and Performance Guide e 21 Capitolo 6 di 
questa guida per ulteriori dettagli. 
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Per lavorare con AutoLISP Esteso Release 10 bisogna avere 2 disposizione: 


am un computer basato SU microprocessore Intel 80286 o 80386, gestito da AutoCAD, con 
una memoria di almeno 640 Kbytes e un disco rigido 


= almeno 512 Kbytes di memoria estesa del tipo IBM AT (e non Lotus/Intel/Microsoft) 
non destinata ad altro impiego (come dischi di RAM). 


. PC-DOS/MS-DOS Versione 2.0 o seguenti 
a una versione compatibile di AutoCAD comprendente ADE-3. 


Se disponete di Quanto elencato. potete utilizzare AutoLISP Esteso ai posto del AutoLISP 
normale. AutoLISP Esteso opera in modo g0286/80386 protetto € risiede nella memoria estesa, 
permettendo così ai programmi di AutoLISP di essere di dimensioni maggiori € gestire una 
quantità superiore di dati che non AutoLISP normale. L'utilizzo di AutoLISP Esteso al posto 
dell’AutoLISP normale libera una quantità maggiore di memoria di DOS (al di sotto di 640K) 
per effettuare paginazioni 1/0. AutoLISP Esteso non può funzionare SU computer del tipo 


PC/XT dal momento che la loro unità centrale non gestisce il modo operativo protetto. 


Prescindendo dalla maniera di utilizzare la memoria, non esiste nessuna differenza per quanto 
riguarda Je f unzioni e le applicazioni tra AutoLISP normale € AutoLISP Esteso 


23.) Confi i 
Quando si configura AutoCAD. uno dei parametri operativi da definire riguarda l'utilizzo 0 
meno di AutoLISP. Sotto PC-DOS/MS-DOS, il Configuratore presenta UN ulteriore messaggio 
she domanda se si vuole utilizzare AutoLISP Esteso. Per utilizzare solo AutoLISP Esteso, occorre 
rispondere “si”. Rimandiamo alla auoCAD Insiallanon and Performance Guide per ulteriori 
dettagli. 


“ <9 Variabili d° 


La variabile d'ambiente LISPXMEM permette di controllare l'area di memoria estesa che 
autoLISP Esteso utilizzerà. (Se LISPKMEM non è definita, AutoLISP Esteso utilizzerà tutta la 
memoria estesa disponibile oltre ai dischi di RAM). AutoLISP Esteso informa AutoCAD 
dell'area di memoria che sta usando. rendendo quest'area inutilizzabile per paginazione 1/0. 


Una porzione della memoria estesa assegnata ad AutoLISP Esteso deve essere tenuta da parte 
some area di stack. Se utilizzate un pacchetto applicativo come AutoCAD AEG, consultare il 
relativo manuale per verificare l'impostazione da dare alla variabile d'ambiente LISPSTACK. 
(AutoLISP Esteso non si serve della variabile d'ambiente LISPHEAP) 


Rimandiamo alla AU0CAD Insiallanon and Performance Guide e al Capitolo 6 di questa guida 
per ulteriori dettagli. 
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- «epviraiodì E 


AutoL.ISP Esteso è impiementato come programma separato, EXTLISP, che deve essere lanciato 
prima di AutoCAD. EXTLISP è un programma residente del tipo “terminate-and-stav” (TSR) 
che risiede parzialmente nella memoria estesa e comunica con AutoCAD tramite il file di 
sovrapposizione “acadlx.ovi". Potete aggiungere il comando EXTLISP necessario nei vostro 
"autoexec.bar”, se lo desiderate. 


Potete rimuovere EXTLISP dalla memoria dopo aver lanciato AutoCAD. Per fare questo, 
richiamate il comando REMLISP mentre siete in DOS. REMLISP restituisce a DOS la memoria 
consumata da EXTLISP. Se EXTLISP è stato l'ultimo programma TSR caricato, questa 
procedura riporterà la memoria alla situazione prima di lanciare EXTLISP. 


2,4 Funzioni mati -_ File" b 

Ogni volta che inizia una sessione nell'Editore di Disegni di AutoCAD, AutoLISP carica il file 
“acad.lsp* (se presente). In questo file si possono riporre le definizioni di funzioni ricorrenti: esse 
verranno valutate automaticamente ogni volta che si inizia a editare un disegno. Per ulteriori 
informazioni a riguardo, rimandiamo alla funzione DEFUN nei Cap. 4 di questo manvale. 
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Capitolo 3 


Esempio di programmazione 


La potenza di AutoCAD risiede priacipalmente nella possibilità di personalizzario. Man mano 
che si acquista dimestichezza con AutoCAD, cresce anche l'esigenza di automatizzare 
determinate operazioni ricorrenti. Ciò è possibile grazie all'architettura aperta di AutoCAD, che 
permette di trasformario gradualmente in uno strumento di lavoro che risponde perfettamente 
alle esigenze specifiche di ogni utente. Si può, ad esempio, aggiungere ai menù di schermo, di 
tavoletta e dei pulsanti, sequenze di comandi frequentemente utilizzati; si possono definire nuovi 
tipi di linea, modelli di tratteggio, stili di testo, ecc. Le possibilità sono numerosissime. 


AutoL.ISP, un'impiementazione del linguaggio LISP compresa ne! pacchetto opzionale ADE-3 di 
AutoCAD, rappresenta il mezzo migliore per potenziare AutoCAD. Infatti, con la possibilità di 
serivere programmi in LISP, l'utente è in grado di aggiungere comandi personali ad AutoCAD e 
di modificare il programma. ha cioé a sua disposizione gli stessi mezzi usati dai nostri 
programmatori per lo sviluppo ii AutoCAD. 


In questo capitolo aggiungeremo un nuovo comando ad AutoCAD e questo esempio ci 
permetterà di spiegare il modo di procedere di AutoLISP. Anche se il comando che 
svilupperemo è concepito per essere impiegato nell'architettura dei giardini, i concetti trattati 
sono evidentemente validi per ogni tipo.di applicazione. 


11 Considerazioni preliminari 


Presentando questo esempio di programmazione supponiamo che chi lo studia sia un utente 
pratico di AutoCAD, cioé pratico dei comandi e dei concetti fondamentali del programma. 
Inoltre supponiamo che abbia a disposizione un editore di testo con il quale può scrivere file 
ASCII. 


Nell'esempio trattato in questo capitolo ricorreremo spesso a varie funzioni di AutoLISP: i 
Capitoli 4 e 5 sono interamente dedicati alla loro descrizione e spiegazione. 


3,2 Qhiettiv 


L'obiettivo che ci siamo prefissati è quello di creare un nuovo comando AutoCAD che disegni 
un viale da giardino e lo riempia di piastrelle circolari in cemento. Il nuovo comando presenterà 
questa sequenza: 


Comando: VIALE 

Punto di partenza del viale: (cunto di partenza) 
Punto finale del viale: (punto ‘inale) 

Mezza larghezza del viale: (numero) 

Raggio delle piastrelle: (numero) 
Spaziatura tra piastrelle: (uumero) 


in cui il punto di partenza è il puo finale specificano l'asse del viaie. In seguito si ha la 
possibilità di specificare la mezza larghezza del viale, il raggio delle piastrelle e la spaziatura tra 
le piastrelle. La ragione per cui si usa la mezza larghezza piuttosto che la larghezza totale dei 
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viale è dovuta al fatto che per specificarla si usa il cursore 2 linea elastica sullo schermo 
ancorato al punto iniziale del viale. 


3 nvertiri i in_radianti 


Nel nostro esempio faremo spesso uso di angoli e, dato che AutoLISP, come molti altri linguaggi 
di programmazione, specifica gli angoli in radianti mentre noi siamo abituati a specificarli in 
termini di gradi, definiremo una funzione che converte gradi in radianti. I radianti misurano gli 
angoli da zero a 2 * PI. Dapprima generiamo un file chiamato VIA.LSP con l'editore di testi, 
poi immettiamo il programma seguente: 
; Convertire angoli da gradi in radianti 
(defun gir (8) 

ce pi (/ a 180.09) 
) 


Consideriamolo da vicino. Stiamo definendo una nuova funzione con la funzione DEFUN di 
AutoLISP. Questa nuova funzione si chiama GIR (sta per “gradi in radianti") e ha un argomento 
"A*, cioé l'angolo in gradi, e da come risultato l'espressione: 


PI * (a / 180.0) 






espressa in notazione LISP, che può essere letta nel modo seguente: "il prodotto di PI 
moltiplicato per il quoziente di A diviso per 180.0". PI è predefinito in AutoLISP e sta per 
3.14159.... La riga introdotta da un punto € virgola è un commento. AutoLISP ignora qualsiasi 
testo su una riga che inizia con un punto € virgola. 


Ora salviamo il file su disco e lanciamo AutoCAD per iniziare un nuovo disegno (il nome non 
importa, dato che non salveremo il disegno 2 sessione ultimata). Quando appare il messaggio 
*Comando:” di AutoCAD. carichiamo la funzione digitando: 


Comando: (load via") 


AutoLISP carica la funzione riferendosi ad essa con il nome che le avevamo assegnato ("GIR"). 


D'ora in poi, quando leggerete "Lanciamo AutoCAD e carichiamo il programma” in questo . 
manuale. significa che ci riferiamo alla sequenza appena descritta. 


Passiamo ora a verificare la funzione eseguendola con diversi valori. Dalla definizione di 
radianti dara sopra, zero gradi dovrebbero corrispondere a zero radianti, quindi immettiamo: 


Comando: (gir 0) 


in AutoCAD. Digirando una riga che inizia con una parentesi di apertura induciamo AutoCAD 2 
passare la riga ad AutoLISP per la valutazione. In questo caso facciamo valutare la funzione GIR 
che abbiamo appena definito. dandole l'argomento zero. Dopo la valutazione della funzione. 
AutoCAD visualizza il risultato. quindi la riga che abbiamo digirato dovrebbe produrre l3 
risposta: 


0.0 


} 
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Proviamo con 180 gradi. Se immettiamo: 
Comando: (gir 180) 
dovremmo ottenere: 
3.14159 


Questo significa che 180 gradi è pari a PI radianti. Esaminando la funzione constatiamo che ciò 
corrisponde a quanto definito sopra. 


Ora usciamo da AutoCAD digitando: 


Comando: USCIRE 
Volete eliminare le modifiche apportate al disegno? S 


e rispondiamo: 
0 


al messaggio di richiesta del Menu Principale per tornare al messaggio di DOS. D'ora in poi, 
quando in questo testo figurera "Usciamo da AutoCAD", si intenderà questo procedimento. 


4_0t La jvi vi 


Îl nostro comando VIALE deve chiedere all'utente di specificare la posizione in cui disegnare il 
viale, la sua larghezza, la dimensione delle piastreile in cemento e la spaziatura fra di esse, 
Definiremo una funzione che sollecita l'immissione di tutti questi parametri e calcola i vari 
numeri che useremo in seguito. 


Con l'editore di testo aggiungiamo a VIA.LSP le righe seguenti (per mettere in evidenza !e righe 
aggiunte di volta in volta le abbiamo indicate con barre verticali): 


hi Convertire angoli da gragi in radianti 
(defun sir (a) 
(* pi C/ a 180.0)) 


Î H Ottenere dati relativi al viaie 


! (defun viautente () 

] (Seta pp (getpoint "\nPunto di partenza del viale: ")) 

Î {seta pf (getpoint "\nPunto finale cei viale: ")) 

(seta mtarg (gerdist “\nMezza largnezza dei viale: " pp)) 
Hi (seta rpias (getdist “\nRaggio piastrelle: “" pp)) 

i (seta spias (getdist “\nSpaziatura tra piastrelle: " Dp)) 


I {seta angv (angle pp pf)) 

(seta lungv (distance pp pf)) 

! (setq targ (* 2 miarg)} 

(seta angp90 (+ angv (gir 90))) 1 Anqoio viale * 90 gragi 
Ì (seta ange90 (- angv (gir 90))} : Angolo viale - 90 gradi 





13 
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Non è obbligatorio rientrare i paragrafi della funzione. Volendo si può addirittura digitare 
‘intera funzione senza andare mai a capo. Il rientrare i paragrafi e l'andare a capo hanno l'unico 
scopo di dare un'ordine interno alla f unzione, in modo che sia più chiara e leggibile. Anche le 
parentesi iniziali e finali delle espressioni principali sono state allineate per evidenziarie e risulti 
perciò più difficile il dimenticare delle parentesi di chiusura. 


Con ciò abbiamo definito una funzione chiamata VIAUTENTE. Questa funzione non possiede 
argomenti e sollecita l'utente ad immettere i valori richiesti per i vari parametri. La f unzione 
SETQ dà a una variabile di AutoLISP un valore specifico. La prima funzione, SETQ, dà alla 
variabile PP (punto di partenza) il risultato della funzione GETPOINT. La funzione GETPOINT 
sollecita l'immissione di un punto da parte dell'utente. La stringa specifica il messaggio di 
richiesta che apparirà in AutoCAD. "\n° fa sì che il messaggio venga visualizzato sulla riga 
successiva. Usiamo la funzione GETDIST per ottenere la mezza larghezza del viale, il raggio 
delle piastrelle e la joro spaziatura. Il secondo argomento della funzione GETDIST, PP, è il 
"punto base" della distanza. che è determinata da questo © dal punto finale del viale, immesso 
con l'aiuto del cursore a linea elastica ancorato al punto di partenza. 


Dopo aver ottenuto i dati richiesti. AutoLISP calcola diverse variabili ricorrenti: ad ANGV 
viene assegnato l'angolo compreso fra il segmento che unisce il punto di partenza € quello finale 
e orizzontale; la f unzione ANGLE restituisce questo angolo dopo l'immissione dei due punti; la 
variabile LUNGV ottiene la lunghezza del viale. Dati due punti, la funzione DISTANCE ne 
calcola la distanza. Visto che abbiamo specificato la mezza larghezza del viale, ne possiamo 
dedurre la larghezza totale. Infine calcoliamo € memorizziamo l'angolo del viale più o meno 90 
gradi nelle variabili ANGP90 e ANGM90 rispettivamente (dato che in AutoLISP gli angoli sono 


in radianti, abbiamo usato la funzione GIR per convertire gradi in radianti prima di passare ai 
calcoli). 


La figura illustra l'effetto delle variabili ottenute da VIAUTENTE. 
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A questo punto salviamo il programma aggiornato su disco, richiamiamo AutoCAD e carichiamo 
il programma. Passiamo ora a verificare la funzione. Dapprima attiviamo ia funzione digitando: 


Comando: (viautente) 
e alle richieste rispondiamo come segue: 


Punto di partenza del viale: LI 
Punto finale del viale: 0f£ 
Mezza larghezza del viale: 2 
Raggio delle piastrelle: .. 
Spaziatura tra piastrelle: / 


VIAUTENTE usa i valori forniti per calcolare le variabili addizionali e visualizza il risultato del 
suo ultimo calcolo (in questo caso, -0.36217, che corrisponde al valore di ANGM09O in radianti). 
Per ottenere il valore delle variabili specificate dalla funzione VIAUTENTE. basta immetterne ii 
nome preceduto da un punto esclamativo (!). Ciò induce AutoCAD a valutare la variabile e 3 
visualizzare il risultato ottenuto. Immettendo i comandi seguenti. dovremmo ottenere i risultati 
mostrati: 


Comando: ‘rp 
(2.0 2.0 0.0) 
Comando: pf 
(9.0 8.0 0.0) 
Comando: miara 


2.0 

Comando: ‘ars 
4.0 

Comando: 'rnias 
0.2 

Comando:  spias 
0.1 

Comando:  langv 
0.708626 
Comando:  llungv 
9.21954 
Comande: o langn90Q 
2.27942 
Comando: langm99 
-0.86217 


Si noti che PP e PF sono restititi in forma di punti a tre dimensioni, in questo esercizio 
ignoreremo però la componente. ANGV, ANGP90 e ANGM90 sono rappresentati in radianti. 
Dopo aver verificato questi valori, usciamo da AutoCAD e torniamo 2 VIA.LSP neil’editore di 
testo. 
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ManD Erver Ottenuto i dati relativi al viale, passiamo ora a disegnarne il contorno. Aggiungiamo 
te fines indicate al nostro file VIA.LSP. 


ci] Convertire angoli da gradi in radianti 
{defun gir (a) 
c*pi (/ a 180.0)) 


s Ottenere cati relativi al viale 

(defun visutente () 
(seta pp (getpoint W\nPunto di partenza del viale: ")) 
(seta pf (getpoint “"\nPunto finale dei viale: ")) 
(setq marg (getdist "\rMezza larghezza del viale: * pp)) 
(setq roias (getdist “\nkaggio piastrelle: * pp)) 
(seta spias (getdist winSpaziatura tra piastrelle: " pp)) 


(seta angv (angie pp pÎ)) 
(seta lungv (distance po più) 
cseta larg (* 2 miarg)) 


(seta angp90 (+ angv (gir 90))) ; angolo viale + 90 gradi 
(seta angn90 (> angy (gir 99))) 1 angolo viale - 90 gradi 
) 
bi Disegnare il contorno del viale 


Ì 

I 

I 

I (defun discon () 

| (commano “piines” 

I seta p (polar pp angn90 mierg)) 
I (seta p (polar p angv Lungv)) 

| (seta p (potar o ango90 larg)) 

Ì (porar p (* angv (gir 180)) iungv) 
I “eniuse” 

I 

I 


) 


Questa aggiunta definisce una funzione chiamata DISCON: essa usa îl punto di partenza. l'angolo 
e la Junghezza del viale ottenuti dalla funzione VIAUTENTE, e disegna il contorno del viale 
con una polilinea. La funzione DISCON usa la funzione COMMAND per sottoporre comandi € 
dati ad AutoCAD. La funzicne COMMAND è infatti il meccanismo Con cui funzioni di 
AutoLISP sotrometrono comandi ad AutoCAD per provocarne l'esecuzione. La funzione 
COMMAND può possedere un numero qualsiasi di argomenti e sottopone ciascuno di essi ad 
AutoCAD. Nel nostro caso, il comando dato ad AutoCAD è "plinea”, cioé il comando che trascia 


polilinee. 





In seguito specifichiamo i Quattro vertici del rettangolo che forma il viale; ognuno di essi viene 
elaborato mediante la funzione POLAR ed è poi memorizzato nella variabile remporanea P. La 
funzione POLAR ha come primo argomento un punto, come secondo un angolo e come terzo 
argomento una distanza € restituisce un punto alla distanza e angolazione specificata dal punto 
di partenza. In questo ca50 calcoliamo i quattro punti legando geometricamente il viale al suo 
punto di partenza. Per concludere il comando, inviamo la stringa “chiuso” al comando PLINEA. 
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con la quale viene tracciato il quarto lato dei viale e torna poi al messaggio “Comandoa:* di 
AutoCAD. 


Per fare un controllo del funzionamento corretto di questa funzione, salviamo il file VIA.LSP 
aggiornato, richiamiamo AutoCAD con un nuovo disegno e carichiamo il file. Attiviamo 
dapprima la funzione di richiesta dati: 


Comando: (viautente) 
e specifichiamo i valori come già fatto in precedenza. Poi richiamiamo la funzione DISCON: 
Comando: (discon) 


La funzione darà ad AutoCAD i comandi definiti per disegnare il contorno e vedremo apparire 
il contorno del viale sul monitor. Dopodiché usciamo da AutoCAD. 


Dopo aver sviluppato e verificato la funzione di richiesta dati e la funzione che disegna il 
contorno del viale, passiamo ora a riempire il viale con le piastrelle circolari. Ci troviamo 
nell'editore di testo, ciò che ci permette di aggiungere al programma le nuove righe indicate: 


: Convertire angoli da gradi in radianti 
(defun gir (a) 
(*pi (/ è 180.0)) 


è Ottenere dati relativi ai viale 


(defun viautente C) 
(seta pp (getpoint "\nPunto di pertenza dei viale: “)) 
(setq pf (getpoint “\nPunta finale cei viaie: "}) 
(setq miarg (getcdist “\nMezza larghezza del viale: “ 29)) 
(seta rpias (getcdist “\nkaggio piastreile: * 29)) 
(setq spias (getcdist “\nSpaziatura tra ciastretle: “ 99)) 


(seta aengv (angie pp pf}) 
(setq lungv (distance pp pf}) 
(setq larg (* 2 miarg)) 


(seta angp90 (+ angv (gir 90))) 3 Angoto viaie * 90 graai 
(setq angm?0 (- angv (gir 90))) : Angoio viale - 90 gradi 
) 
5) Disegnare il contorno del viale 


(defun discon () 
(command "pi ines* 
(setq p (potar pp anga90 miarg)) 
(seta p (potar p angy lungv)) 
(seta p (polar p angp90 larg)) 
(polar p (+ angv (gir 180)) lungv) 
Nchiuso” 
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% Posizionare una fila di piastrelle dato la (lunghezza del viale 
H e se possibile sfaisaria 

(detun disfila (iv stelsa) 

(setq primao (polar pp_anov iw)) 

(seta pcpias (polar primep sangp90 stalsa)) 

(setg pipies pcpias) 

Cunile (< (distance primap pipias) (- miarg rpias)) 

(commend “cerchio” pipias rpias) 

(seto pipias (poler pipias angp90 (* spias rpias rpias))) 
) 

(seta pipias (polar pepias angm90 (+ spias rpias rpiss))) 

(while (< (distance primap pipias) (€ miarg rpias)) 

(command “cerchio” pipias rpias) 

(setq pipias (poiar pipias angm90 (+ spias rpias rpias))) 


Disegnare ie file di piastrelle 

(defun dispias () 

(seta plungy (* roias spias)) 

(seta sfal 0.0) 

(unite (es piungv (- Lunev rpias)) 

(disfila piungv stal) 

(setq piungv (+ plungv (* (+ spias rpias rpias) (sin (gir 60))))) 

(#4 (» stai 0.0) 
(seta stal (* (+ spias rpias rpias) (cos (gir 69)))) 
(seta sfal 0.0) 


; 


I 
| 
Ì 
| 
Ì 
| 
I 
Ì 
Ì 
Î 
Ì 
Ì 
I 
| 
I 
Ì ) 
| 
I 
Ì 
I 
| 
I 
Ì 
Ì 
Ì 
] 
I 
Ì 
Ì 
Ì 
I 


} 


Per comprendere meglio l'effetto di queste funzioni facciamo riferimento alla figura seguente. 
La funzione DISFILA disegna una fila di piastrelle con una data spaziatura lungo il viale 
specificato dal suo primo argomento. sfalsando la fila successiva di una distanza data dal 
secondo argomento. Per coprire razionalmente la superficie 2 disposizione, sfalsiamo ora le 
piastrelle una rispetto all'altra. 
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OO Geomezria delle soczioture 
tra c'iastrelle 
= VIDA, 
7 


DISFILA trova la posizione della prima piastrella nella fila usando POLAR per spostarsi lungo il 
viale della distanza data dal primo argomento e usando nuovamente POLAR per spostarsi 
perpendicolarmente al viale per la sfalsatura. ln seguito usa la funzione WHILE per continuare a 
disegnare cerchi finché incontra il bordo del viale. SETQ alla fine del ciclo di WHILE si sposta 
nella posizione della piastreila successiva con una spaziatura di due voite il raggio della piastrella 
più la spaziatura intermedia. 


Il secondo ciclo di WHILE disegna le file di piastrelle nell'altra direzione finché viene incontrato 
il bordo opposto del viale. 


DISPIAS è la funzione che richiama ripetutamente DISFILA affinche disegni tutre le file di 
piastrelle. II suo cicio WHILE avanza lungo il viale richiamando DISFILA per ogni fila. Le 
piastreile di file adiacenti formano triangoli equilateri come mostrato nella figura. I lati di questi 
triangoli sono uguali al doppio dei raggio delle piastrelle più la spaziatura intermedia. Quindi 
questo valore moltiplicato per il seno di 60 gradi da la distanza tra le file e lo stesso valore 
moltiplicato per il coseno di 60 gradi da il valore di cui vengono sfalsate le file pari rispetto a 
quelle dispari. 


Si noti ii modo in cui viene usata la funzione IF in DISFILA per stalsare le file pari: la funzione 
IF verifica il suo primo argomento ed esegue il secondo argomento se è vero, se invece è falso, 
esegue il terzo. Nel nostro caso, quando OFF è uguale a zero, la fila viene sfalsata del valore che 
si ottiene moltiplicando la distanza tra i centri delle piastrelle per il coseno di 60 gradi. Quando 
OFF è diverso da zero, il valore della sfalsatura è zero. 


Per fare una verifica di questa funzione, salviamo il file, richiamiamo AutoCAD e carichiamo il 
programma. Poi digitiamo: 


Comando: (viautente) 
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e rispondiamo alle richieste come già visto. Immettiamo: 
Comando: (discon) 

e viene tracciato il contorno, come già visto. Digitiamo infine: 
Comando: (dispias) 


e tutte le piastrelle dovrebbero essere disegnate entro i bordi del viale. 


3,7 i re_il coma 


Siamo ora in grado di combinare le varie sequenze sviluppate finora per farne un comando 
AutoCAD. Se in AutoLISP definiamo una funzione con il nome CXXXX, digitando XXXX (a 
condizione che XXXX non sia un comando già definito in AutoCAD) richiamiamo la funzione. 
Per completare l'implementazione del comando VIALE, definiamo la funzione C:VIALE che ci 
permette di digitare semplicemente VIALE in un momento qualsiasi dopo aver caricato VIA.LSP 
per eseguire il comando che traccia un viale da giardino. 


Aggiungiamo ora le righe indicate al file VIA.LSP, richiamiamo AutoCAD e carichiamo il 
programma. 


(defun gir (8) 
copi (/ a 180.0)) 


; Convertire angoli da gradi in radianti 


n Ottenere dati relativi al visie 


(defun viautente () 
(seta po (getpoint #«\nPunto di partenza del viale: ")) 
sm (setq pf (getpoint w\npunto finale dei viale: ”) 
(seta miarg (getcist svrmezza larghezza del viale: “ poi) 
(seta rpias (petdist »imaggio piastrelle: * pp)) 
(seta spias (petdist “\nfpeziatura tra piastrelle: * ppi) 


(seta angy (angle pp pÎ)) 
(setq lungv (distance pp pî)) 
(seta Larg (* 2 mlarg)) 


(setq ang 790 (+ anev cgir 90))) 1 angolo viale * 90 gradi 
(seta angn90 (> angy gir 90))) ; angolo viale - 90 gradi 
) 
5 Disegnare il contorno del viaie 


(detun discon () 
(command “piines" 
(seta p (polar pp angn90 miarg)} 
(seta p (potar p angy LungY)) 
(seta p (polar p angp90 lerg)) 
(polar p (* angy (gir 180)) lungv) 
"chiuso" 
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o) Posizionare une fila di pisstreile data (a iungnezza dei viale 
; e se possibile sfalsarta 


(defun distila (iv stfaisa) 
(seta primsp (polar pp angv lv}} 
(setà pcpias (polar primag angp90 sfalsa)) 
(setq pipias pcpiss) i 
(uhile (< (distance priamp pipias) (- mierg rpias)) 
(command “cerchio” pipiss rpise) 
(seto pipias (polar pipisa angp90 (+ spias rpias rpias))) 
) 
(seta pipias (polar pcpies anga90 (+ spias rpias rpias))) 
(uhite (< (distance primsp pipias) (- miarg rpisa)) 
(command “cerchio* pipias rpias) 
(teta pipias (polar pipisa angn90 (+ spiasa rpias rpiss))) 


Disegnare le file di piastreite 


(detun dispias () 
(seta piungv (* rpias spias)) 
(seta sfal 0.0) 
(mhile (<= plungv (> lungv rpias)) 
(distile piungv steli) 


(ff (= stal 0.0) 
(seta sfal (* (+ spias rpiasa rpias) (cos (gir 60)))) 
(sera sfai 0.0) 


È Eseguire il comando, richiasanco ie sue funzioni 


I 

Ì 

I 

I (detun C:VIALE () 
[ (viautente) 
Ì (discon) 

Ì (dispias) 

] 


) 


egiungendo una funzione chiamata C:VIALE abbiamo aggiunto il comando VIALE ad 


UtoCAD, Possiamo fare una verifica del comando immettendo: 


Comando: VIALE 

Punto di partenza del viale: 2) 
Punto finale del viale: 2f 
Mezza larghezza del viale: 1 
Raggio delle piastrelle: ./ 
Spaziatura tra piastrelle: J/ 


(seta piungv (* piungv (* (* spias r0iss rpias) (sin (gir 60))))) 
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Questa sequenza disegna la figura che segue. 





A liminar ipetizi i ndi 


Durante l'esecuzione del comando VIALE. tutti i corsandi che questo sottopone ad AutoCAD 
vengono ripetuti nell'area dei messaggi e tutti i punti che seleziona sono marcati sullo schermo 
mediante piccole croci. Dopo che ij programma è stato messo a punto, la visualizzazione di 
questi dati può essere disattivata affinché il comando impiementato si presenti come un comando 
AutoCAD. Aggiungiamo le righe al file VIA.LSP per sopprimere la ripetizione dei comandi e le 
croci di marcatura: 


Convertire angoli da gradi in radianti 


(defun gir (a) 
ce pi (/ a 180.09) 
) 


Otrenere dati relativi al viale 


(detun viaurente () 
(setq pp (getpoint "\nPunto di partenza del viale: ")) 
(seta pf (petpoint “\nPunto finale del viale: ")) 
(setq mierg (getdist s\mezza larghezza del viale: " pp)} 
(seta rpiss (getdist "\maggio piastrelie: “ pp)) 
(seta spias (getoist e\nSpaziatura tre piestrelle: * pe)) 


(seta angv (angie pp più) 
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{seta lungv (distance pp pf)) 
(seta lerg (* 2 eiarg)) 


(seta angp90 (+ engv (gir 90))) i Angolo viale » 90 gradi 
(seta angn90 (- angv (gir 90))) 3 Angolo viele - 90 gradi 
) 
: Disegnare il contorno del viale 


(defun discon () 
(command “piinee® 
(seta p. (polar pp angs90 mlarg)) 
{seta p (polar p engv lungv)) 
(seta p (polar p engp90 targ)) 
(polar p (+ angv (gie 180)) lunev) 
Nehiuso” 


Posizionare una fila di piastreile data la lungnezza cei viale 
e se possibile sfaisaria 
defun distila (lv staisa) 
(setq primso (poiar pp angv lv)} 
(seta pcpias (polar primap angp90 sfalza)) 
(setq pipies pcpies) 
(mile (< (distance primap pipias) (- miarg rpias)) 
(commerzi "cerchio" pipise rpias) 
(seta pipias (poier pipias angp90 (+ spias rpiss rpiss)}}) 
) È vu riù 
(setg pipiss (polar pcpias angs90 (+ spies rpies rpiaz))) 
(ile (< (distance primap pipias) (- mlarg rpias)) 
(commi “cerchio” pipias rpias) 
(setq pipias (polar pipias anga?0 (+ spias rpias rpias))) 


o 


» 
40 2 
di d 
SA 
: Oisegnare ie file di piastrelle 


(defun dispias () 
(seta plungv (+ rpias spias)) 
(setq sfal 0.0) 
(while (<= piungv (- lungw rpias)) 
(disttia piungv sfal) 
(seta piungv (+ plungv (* (* spias rnias rpias) (sin (gir 60))))) 
Cif (= stat 0.0) 
(setq sfal (* (+ spias rpias rpias) (cos (gir 40)))) 
(setq sfal 0.0) 


si; Eseguire il comando, richiamando ie sue funzioni 
(defun C:VIALE () 


(vieutente) 
I (setq ptinis (getvar “bl ipmode*)) 
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| (setq ecocoms (gervar “cadecho“)) 
Ì (setvar “blipmode" 0) 
Ì (setvar “croecho” 0) 
(discon) 
(dispias) 
I (setvar “blipgmode"” ptinis) 
Il (setvar “cmiecho” ecocome) 
è) 


Usiamo la funzione GETVAR per ottenere i valori correnti delle variabili BLIPMODE € 
CMECHO di AutoCAD. Queste variabili sono salvate mediante SETQ e ECOCOMS. Usiamo poi 
la funzione SETVAR per azzerare le due variabili, disattivando la visualizzazione dei punti di 
riferimento e delle sequenze di comando. E' da notare che azzeriamo queste variabili solo dopo 
aver ottenuto i dati dall'utente tramite VIAUTENTE. I! punti di riferimento possono infatti 
rivelarsi utili per avere una conferma dell'immissione dei dati. 


Quando il disegno del viale è terminato, usiamo la funzione SETVAR per ridare alle due 
variabili i loro valori originali. 


Infine salviamo il file. richiamiamo AutoCAD e proviamo ad immettere il comando VIALE, 
specificando parametri diversi sia dalla tastiera che con il puntatore. 


3,9 Riassunto 


Con un investimento di tempo relativamente piccolo, abbiamo aggiunto un nuovo comando ad 
AutoCAD. Con altri sistemi CAD avremmo dovuto accedere al codice di sorgente del sistema, 
essere programmatori esperti e conoscere 2 fondo un'enorme quantità di nozioni per ottenere lo 


stesso risultato. L'architettura aperta di AutoCAD e di AutoLISP permettono di usufruire delle * 


prestazioni che la maggior parte dei fornitori di CAD riservano ai loro programmatori. 


Questo esempio può servire da primo esercizio per iniziare a lavorare con AutoLISP. la seguito 
si può provare a modificare 0 ad ampliare il comando VIALE, facendogli disegnare, ad esempio, 
piastrelle quadrate 0 esagonali. Un'applicazione piu avanzata consisterebbe nel creare un nuovo 


comando cne sollecita l'immissione di un punto centrale e di un'area per disegnare un ouadrato 
che abbia l'area specificata e che la riempia di piastrelie. 


I capitoli che seguono presentano dettagliatamente la sintassi e il modo di operare di ogni 
funzione di AutoLISP. In questo capitolo ci siamo limitati a presentare una breve descrizione 
dell'effetto di alcune funzioni, ma provando a creare e a modificare altre funzioni scoprirete voi 
stessi le innumerevoli possibilità che AutoLISP ofire. 
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Capitolo 4 
Funzioni di AutoLISP 





AutoLISP contiene numerose funzioni predefinite. Ogni funzione è richiamata con il suo nome 
(in lettere maiuscole o minuscole) quale primo elemento di un lista, con gii argomenti relativi ad 
essa (se presenti) come elementi successivi della lista. 


Questo capitolo presenta tutte le funzioni essenziali di AutoLISP in ordine alfabetico. L'indice 
analitico di questo manuale raggruppa le funzioni per facilitarne la consultazione. Molte funzioni 
"sono standard, cioé si ritrovano in ogni implementazione del linguaggio di programmazione 
LISP, mentre altre funzioni sono tipiche dell'ambiente grafico interattivo di AutoCAD. Alcune 
funzioni avanzate verranno descritte nei capitoli seguenti. 





AutoLISP Release 10 gestisce tutte le nuove funzioni 5D di AutoCAD pur restando compatibile 
con tutte le routine scritte per versioni precedenti di AutoCAD. La variabile di sistema 
FLATLAND è stata aggiunta proprio per garantire questa compatibilità. Quando FLATLAND 
ha valore 0, le modifiche 3D sono attive, se si assegna invece 1 FLATILAND un valore diverso 
da 0, la funzioni si comportano come nella versione 9 di AutoLISP. L'impostazione di 
FLATLAND influisce sulle seguenti funzioni di AutoLISP: 


DISTANCE GRREDAD POLAR 
ENTGET INITGET TBLNEXT 
GETDIST INTERS TBLSEARCH 
GETPOINT OSNAP 


La maniera in cui FLATLAND influisce su queste funzioni è riportata sotto la descrizione di 
ogni funzione. 

FLATLAND è un ausilio temporaneo alla conversione e verrà eliminata nella prossima versione di 
AutoCAD. 


4 *_ < rO>_< Pett 
Questa funzione restituisce la somma di tutti i numeri, che possono essere reali o interi. Se tutti 


i numeri sono interi, il risultato sarà un intero; se alcuni dei numeri sono reali, i numeri interi 
verranno convertiti in reali e il risultato sarà un numero reale. Esempio: 


(+ L 2) restituisce 3 
(+ 123 4.5) restituisce 20.5 
(+ 12 3 4.0) restituisce 10.0 


43 (- <numero> <numero>...) 


Questa funzione sottrae il secondo <numero> dal primo e restituisce la differenza. Se sono dati 
Più di due numeri, la somma del secondo più gli altri fino all'ultimo viene sottratta dal primo e 
Viene restituito il valore finale. Se è dato un solo <numero>, il risultato è dato dalla sottrazione 
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di questo da zero. Questa funzione può essere usata Con pumeri interi 0 reali e valgono le regole 
standard di conversione. Esempio: 


(- 50 40) restituisce 20 

(- 50 40.0 2) restituisce 8.0 

(- 50 40.0 2.5) restituisce 7,5 

(- 8) restituisce 8 
44 (* <numero> < TOP. 


Questa funzione restituisce il prodotto di tutti i numeri, Questa funzione può essere usata con 
numeri interi o reali e valgono le regole standard di conversione. Esempio: 


(* 2 3) restituisce 6 

(* 23 4.0) restituisce 24.0 

(* 3 24.5) restituisce 723.5 
450 <numero> <NUMEro>. se 


Questa funzione divide il primo <numero> per il secondo e restituisce il quoziente. Se sono dati 
più di due numeri, il primo <numero> viene diviso per il prodotto del secondo con gli altri fino 
all'ultimo e viene restituito il quoziente finale. Questa funzione può essere usata Con numeri 


interi 0 reali e valgono le regole standard di conversione. Esempi: 


(/ 200 2) restituisce 50 
(/ 200 2.0) restituisce 50.0 
(/ 200 20.0 2) restituisce 2.5 
(/ 200 20 2) restituisce 2 
(/ 235 360) restituisce 0 
.__ 2135 360.0) restituisce 0.375 
1,6 (= < o> <at Diso 


Questa è la funzione “uguale a", che restituisce T se tutti gli atomi specificati sono 
numericamente uguali o NIL se non lo sono. Questa funzione è valida anche per numeri € 
stringhe. Esempi 


(= 4 4.0) restituisce T 
(m 20 388) restituisce NIL 
(= 2.4 2.4 2.4) restituisce T 
(= 499 499 500) restituisce NIL 
(= "mio" "mio") restituisce T 
(® "mio" "tuo") restituisce NIL 
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4 n_< >_< > 

ta è la funzione “diverso da”, che restituisce T se il primo atomo non è numericamente 
uguale al secondo o NIL in caso contrario. Se sono presenti più di due atomi, la funzione rimane 
indefinita. Per esempio: 


(/= 10 20) restituisce T 
(/r8 "tu Ntu) restituisce NIL 
(/=e 5.43 5.44) restituisce T 

4 << > <atomo>.. 


Questa è la funzione “minore di”, che restituisce T se il primo <atomo> è minore del secondo 0 
NIL in caso contrario. Se sono dati più di due atomi, viene restituito T se ogni atomo è minore 
dell’ <atomo> alla sua destra. Ad esempio: 


(< 10 20) restituisce T 
(< "Db" "c“) restituisce T 
(< 357 33.2) restituisce NIL 
(< 2 3 88) restituisce T 
(< 23 4 4) restituisce NIL 


4 <z_<atomo> <atomo>... 


Questa è la funzione relazionale “minore di o uguale 2°, che restituisce T se il primo <atomo> è 
minore o uguale al secondo 0 NIL in caso contrario. Se sono presenti più di due atomi, viene 
restituito T se ogni atomo è minore o uguale ail'<atomo> alla sua destra. 


(<= 10 20) restituisce T 

(<= "Db" "b") restituisce T 

(<= 357 33.2) restituisce NIL 

(<= 2 9 9) restituisce T 

(<= 2 9 4 5) restituisce NIL 
4 > <atomo> < PIE 


Questa è la funzione “maggiore di", che restituisce T' se il primo <aromo> è maggiore del 
secondo o NIL in caso contrario. Se sono presenti più di due atomi. viene restituito T se ogni 
atomo è maggiore dell'<atormno> alla sua destra. Esempi: 


(> 120 17) restituisce T 
(> "cc" "b") restituisce NIL 
(> 3.5 1792) restituisce NIL 
(> 77 4 2) restituisce v 
(> 77 4 4) restituisce NIL 
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ill (>= <aromo> <atcomo>.. Par: 


Questa è la funzione “maggiore di o uguale a”, che restituisce T se il primo <atomo> è maggiore 


di o uguale al secondo o NIL in caso contrario. Se sono presenti più di due atomi, viene 
restituito T se ogni atomo è maggiore di o uguale all'<atomo> alla sua destra. Esempi: 


(>= 120 17) restituisce T 
(>= "c" "c") restituisce T 
(>= 3.5 1792) restituisce NIL 
(>e 77 4 4) restituisce T 
(>= 77 4 9) restituisce NIL 


«12 (e <numero> Ì 


Questa funzione restituisce il NOT (compiemento di uno) del <numero> a livello di bit . 
<numero> deve essere un intero. Ad esempio: 


(- 3) restituisce 4 
(- 200) restituisce -l01 
(- =4) restituisce 3 


LIL + <numero> 


Questa funzione restituisce <numero> aumentato di | (incrementato). <numero> può essere reale 
o intero. Esempi: fot tini, Senio creo) 


(1+ 5) restituisce 6 
(12+ —17.5) restituisce 16.5 
lt (ie <NUmeT o>) 


Questa funzione restituisce <numero> diminuito di 1 (decrementato). <numero> può essere reale 
o intero. Esempi: 


(2- 5) restituisce 4 ì 
(2- +—17.5) restituisce "18.5 i 
4] bs < ro> : 


Questa funzione restituisce il valore assoluto del <numero>. <numero> può essere reale o intero. 
Ad esempio: 


(abs 100) restituisce 100 
(abs -100) restituisce 2100 
(abs 99.25) restituisce 99.25 
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4 <e >. 


ta funzione restituisce l’AND logico di una lista di espressioni. Essa interrompe ogni 
uiteriore valutazione e restituisce NIL se una delle espressioni produce NIL, in caso contrario 
restituisce T. Determinando per esempio quanto segue: 


(setq a 103) 
(setq Db NIL) 
(setq c "stringa") 


allora: 
(and 1.4 a c) restituisce Tr 
(and 1.4 a Db c) restituisce NIL 
4 (a <oti> <Dt2> 


Questa funzione restituisce l'angolo di una linea retta passante cai punto <pti> al punto <pti> 
entrambi dell'UCS. L'angolo è misurato in radianti a partire dall'asse X del piano di costruzione 
corrente e crescente in direzione antioraria. Se vengono forniti svati 3D, verranno proiettati sui 
piano di costruzione corrente. Esempio: 


(angle ‘(21.0 1.0) '(1.0 4.0)) restituisce 1.5708 
(angle '(5.0 1.33) '(2.4 1.33)) restituisce 3.14159 


( < i o>_ l< >_f< isi PRA) 


La funzione valuta <angolo> (un numero reale, in radianti) e !o restituisce trasformato in una 
stringa in accordo con ie impostazioni di <modo>, <precisione> e della variabile di quotatura 
DIMZP. Gli argomenti <modo> e <precisione> sono interi che determinano il tipo di unita 
angolare e il suo grado di precisione. I valori validi per <modo> sono elencati qui sotto: 


Modo ANGTOS | Formato di editazione ! 


l) | Gradi | 


| Gragi/minuti/secono: | 


| Gragi centesimari 
| Radiant: 


unita topogratiche 





L'argomento <precisione> è un intero che seleziona il numero di decimali richiesti dalla 
Precisione desiderata. <modo> e «precisione» corrispondono alle variabili di sistema di 
AutoCAD, AUNITS e AUPREC. Se si omertono gii argomenti. verranno usate le impostazioni 
correnti di AUNITS e AUPREC. 
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Ad esempio, data DIMZP =0 e le impostazioni seguenti: 


(setg ptl '(5.0 2.33)) 
(setq pt2 '(2.4 1.33)) 
(setq a (angle ptl pt2)) 


allora: 
(angtos a 0 0) restituisce "180" 
(angtos a 0 4) restituisce *180.0000" 
(angtos a 1 4) restituisce "180d0'0"" 
(angtos a 3 4) restituisce "3,1416r" 
(angtos a 4 2) restituisce non 


ANGTOS accetta un argomento negativo per <angolo> ma lo trasforma sempre in un valore 
positivo tra 0 e 2 pi greco prima di eseguire la conversione richiesta. Ad esempio: 


(angtos 0.785398 0 4) restituisce "45.0000" 
(angtos -0.785398 0 4) restituisce #315.0000" 


4,19 pe) dà <espress PSP 


Questa funzione valuta un numero qualsiasi di liste (<espressione>) e dà come risultato un'unica 
lista. Esempi: 


(append ‘(a b) '(c d)) restituisce (A B C D) 
(appena '((a) (b)) '((c) (d))) restituisce ((A) (B) (C) (D)) 


APPEND richiede che i suoi argomenti siano liste. 


4,20 (2 v_< jone> <lista> 
APPLY esegue la <funzione> con gli argomenti dati da <lista>. Esempi: 


(apply '+ '(1 2 3)) restituisce 6 
(apply 'strcat '("a" "b" "c")) restituisce “abc" 


APPLY funziona sia con funzioni predefinite (subrs) che con funzioni definite dall'utente 
(create con DEFUN 0 LAMBDA). 
42 ji <strinca> 


Questa funzione restituisce la conversione del primo carattere della <stringa> nel rispettivo 
codice ASCII (un intero) ed è simile alla funzione ASC in BASIC. Esempi: 


(ascii "A") restituisce 65 
(ascii "a" restituisce 97 
(ascii "BIG") restituisce 66 
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4 <e >_< > 


Questa funzione usa il suo primo argomento <elemento> come chiave, cerca la chiave nella lista 
associativa <alista> e restituisce l'ingresso di <alista>. Se <eiemento> non è reperibile come 
chiave in <alista>, ASSOC restituisce NIL. Supponendo che la lista "al", ad esempio, sia definita 
come segue: ” 


((scatola) (larg 3) (altez 4.7263) (profond 5)) 


allora: 


(assoc 'altez al) restituisce (ALTEZ 4.7263) 
(assoc 'peso al) restituisce NIL 


Le liste associative sono usate frequentemente per salvare dati ai quali si può accedere mediante 
una chiave. Ciò è simile alle serie o strutture di altri linguaggi di programmazione. La funzione 
SUBST descritta più avanti in questo capitolo, permette di rimpiazzare il valore associato ad una 
chiave in una lista associativa. 


4 fat < >_f< >I 


Se <num2> non è presente, ATAN restituisce l'arcotangente di <numi> in radianti. <numi> puo 
essere negativo; gli angoli restituiti possono variare da -pi/2.0 a + pi/2.0 radianti. Esempi: 


(atan 0.5) restituisce 0.463648 
(atan 1.0) restituisce 0.785398 
(atan -1.0) restituisce =0.785398 


(angtos (atan -1.0) O 4) restituisce "3115.0000" 


Se sono presenti sia <numl> cile <num2>, viene restituito l'arcotangente di <num]>/<num2> in 
radianti. Se <num2> è zero, viene restituito un angolo di + 0 - 1.570796 radianti (90 gradi o -90 
gradi) a seconda del segno di <numl>. Esempi: 


(atan 2.0 3.0) restituisce 0.588003 
(angtos (atan 2.0 3.0) 0 4) restituisce *23.6901" 
(atan 2.0 =-3.0) restituisce 2.55359 
(angtos (atan 2.0 -3.0) O 4) restituisce 1146.3099" 
(atan -2.0 3.0) restituisce =0.588003 
(atan -2.0 -2.0) restituisce -2.55359 
(atan 1.0 0.0) restituisce 1.5708 
(angtos (atan 1.0 0.0) 0 4) restituisce #90.0000" 
(atan -0.5 0.0) restituisce -1.5708 


(angtos (atan -0.5 0.0) O 2) restituisce "270.00" 


4,24 latof <strinqa> 
Questa funzione restituisce la conversione di una stringa in un numero reale. Ad esempio: 


(atof "97.1") restituisce 97.1 
(atof "3") restituisce 3.0 
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4,25 i <stri > 


Questa funzione restituisce la conversione di una stringa in un numero intero. 


(atoi "97") restituisce 97 

(atoi "3") restituisce 3 

(atoi "3.9") restituisce 3 
4 a < > 


Questa funzione restituisce NIL se <elemento> è una lista, in caso contrario restituisce T. Se un 
elemento non è una lista è considerato un atomo. Determinando per esempio quanto segue: 


(seta a ‘(x y z)) 


(setq b 'a) 

allora: 
(atom 'a) restituisce T 
(atom a) restituisce NIL 
(atom 'b) restituisce T 
(atom Db) restituisce T 
(atom ‘(a b c)) restituisce NIL 


Alcuni dialetti di LISP differiscono nell'interpretazione di ATOM, quindi è necessario verificare 
i codici convertiti. i da 
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Questa è una funzione Booleana generale 2 livello 
di bit. <funz> è un intero tra 0 e 15 che 
rappresenta una delle 16 funzioni Booleane possibili 
in due variabili. Gli argomenti interi successivi 
sono combinati logicamente e sono basati su questa 
funzione e la tabella a destra. 






inti | int2 | funz bit 
o 10 


Ogni bit di <intl> è accoppiato con il bit 
corrispondente di <int2> selezionando una tiga della 
tabella. ll bit risultante è 0 0 1, a seconda 
dell'impostazione del bit di <funz> corrispondente 
alla sua riga nella tabella. Se il bit appropriato è 
definito in <funz>, il bit risultante è 1, altrimenti 0. 


Alcuni dei valori di <funz> sono equivalenti alle operazioni Booleane standard, AND, OR, XOR 
e NOT, elencate qui di seguito: 
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Funa.| Operszione:|- dit risuitante è 1, se... 


i | ANO | entrami i bit d'ingresso sono | 
6 XOR = |soto uno dei due bit d'ingresso e 1 


or | entramos 0 uno dei due Dit d'ingresso e | 







8 | NOT : entranni i bit d'ingresso sono 0 (comiemento di 1) 





Ad esempio: 

(Boole l 12 5) 
specifica un AND logico dei valori 12 e S. Il risultato è 4. In modo analogo: 

(Boola 6 6 5) 
specifica un XOR logico dei valori 6 e 5, restituendo 3. 
Si possono usare altri valori di <funz> per eseguire altre operazioni Booleane che non hanno 
nomi standard. Per esempio, se «<funz> è 4, i bit risultanti sono determinati se i bit 
corrispondenti sono definiti in <int?> e <intl>, Quindi: 


(Boole 4 3 14) 


restituirebbe 12. 


4 <a >) 


Questa funzione restituisce T se <atomo> ha un valore legato ad esso (indipendentemente dallo 
scopo). Se nessun valore è legaro a <atomo> (o se è legato a NIL), viene restituito NIL. 
Determinando per esempio quanto segue: 


(setq a l) 
(setq 5 NIL) 
allora: 
(bound 'a) restituisce Al 
(boundp 'b) restituisce MIL 
4. ca cad cadr, cad ecc. 


AutoLISP gestisce concatenazioni di CAR e CDR fino a quattro livelli di profondità. Ad 
esempio: 


(setq x' ((a b) cd) 


AutoLISP - (4) Funzioni di AutoLISP 


allora: 
(caar x). equivalea (car (car x)) che restituisce A 
(cdar x) equivalea {(edr (car x)) che restituisce (B) 
(cadar x) equivale a (car (cdr (car x))) che restituisce B 
(cadr x) equivalea (car (cdr x)) che restituisce C 
(cAdr x) equivalea (cdr (cdr x)) che restituisce (D) 
(caddér x) equivale a (car (cdr (c@er x))}) che restituisce D 


In AutoLISP. CADR è usate frequentemente per ottenere la coordinata Y di un punto 
bidimensionale o tridimensionile (cioè il secondo elemento di una lista di due o tre numeri 
reali). Analogamente CADDR 110 essere utilizzato per ottenere la componente Z di un punto a 
tre dimensioni. Ad esempio, posti i seguenti valori: 


(seta pr2 '(5.2 1.0)) {un punto bidimensionale) 
(setq pr3 '(5.2 1.0 2. 0) (un punio tridimensionale) 
allora: 
(car pt2) restituisce 5.25 
(cadr pt2) restituisce 2.0 
(caddr pt2) restituisce NIL 
(car pt3) restituisce 5.25 
(cadr pt3) restituisce 2.0 
(cadr pt3) restituisce 3.0 


130 (car <lista>) 


Questa funzione restituisce il :rimo siemento di <lista>. Se la <lista> è vuota, viene restituito 
NIL: Esempi: 


(car ‘(a be)) restituisce A 
(car '((a db) c)) restituisce (A B) 
(car *' ()) restituisce NIL 


131 (edr <lista>) 


Questa funzione restituisce una lista contenente tutti gli elementi della <lista> eccetto il primo. 
Se la <lista> è vuota, viene restituito NIL. Esempi 


(eer '(abece)) restituisce (B C) 
(car '((ab) c)) restituisce (Cc) 
(ear '()) restituisce NIL 


Se l'argomento <lista> è costituito c2 una coppia puntata (vedi quanto riportato Sotto CONS), 


CDR restituisce il secondo eleriento senza comprenderlo all'interno di una lista. Ad esempio: 


(cdr ‘(a . b)) restituisce B 
(e@r '(1. "Testo"); restituisce "Testo" 
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4 chr_<cnumero> 


Questa funzione restituisce la conversione di un intero rappresentante un caratttere ASCII in una 
stringa di un carattere (simile alla funzione CHRS in BASIC). Esempi: 


(cher 65) restituisce "a 

(chr 66) restituisce “p" 

(che 97) restituisce "a" 
4, c e_<descrfile> 


Questa funzione chiude un file e restituisce NIL. <descrfile> e un descrittore di file ottenuto dai 
richiamo della funzione OPEN. Dopo CLOSE, il descrittore di file resta invariato ma non e più 


valido. 


Supponendo ad esempio che X è un descrittore di file aperto valido, 
(close x) 


chiuderebbe il file associato e restituirebbe NIL. 


4,34 (comm < om>...° 


Questa funzione esegue comandi AutoCAD dall'interno di AutoLISP e restituisce sempre NIL. 
Gli argomenti rappresentano i comandi e sottocomandi di AutoCAD. e ogni. argomento viene 
valutato e inviato ad AutoCAD in risposta a messaggi di richiesta successivi. I nomi di comandi 
edi opzioni sono presentati come stringhe, i punti a 2 dimensioni come liste di due numeri reali 
e i punti a 3 dimensioni come liste di 3 numeri reali. AutoCAD riconosce i nomi dei comandi 
solo dopo che ha inviato il messaggio "Comando:”, Ad esempio: 


(setg pel ‘(1.45 3.23)) 

(setg pT2 (getpoino "Izmettere un punto: “)) 
(command "linea" prul 232) 

(command "") 


Supponendo che il messaggio "Comando:” di AutoCAD sia già stato richiamato. questa sequenza 
di espressioni dà un valore al punto ‘5t1", sollecita l'immissione del punto "ptî* ed esegue il 
comando LINEA di AutoCAD con i due punti specificati. Gii argomenti di COMMAND 
possono essere stringhe, reali. interi o punti a seconda del comando AutoCAD che viene 
eseguito. Una stringa nulla ("") equivaie a digitare uno spazio sulla tastiera. Se si richiama un 
COMMAND senza specificare argomenti, ciò equivale a premere CTRL C sulla tastiera, cioe ad 
Annullare un comando (vale per la maggior parte dei comandi AutoCAD). 


I comandi eseguiti dalla funzione COMMAND non vengono ripetuti sullo schermo se la variabile 
di sistema CMDECHO di AutoCAD (accessibile tramite SETVAR e GETVAR) ha il valore zero. 
La funzione COMMAND è il metodo base per accedere a comandi AutoCAD da AutoLISP. 
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Le funzioni GETxxx (GETANGLE. GETSTRING. GETINT. GETPOINT. ecc.) non possono essere 
usale nell'ambito della junzione COMMAND. Ogni tentativo in questa direzione produrrà il 
messaggio "error: AutoCAD rifiuta la funzione”. Se viene richiesto un messaggio. bisogna 


richiamare le funzioni di GET prima. come illustiraio sopra. oppure posizionarle tra richiami 
successivi della funzione COMMAND. 


I comandi TESTODIN e SCHIZZO leggono direttamente dalla iastiera e dal digitalizzarore, non 
possono quindi essere uwilizzati con la funzione COMMAND di AutoLISP. COMMAND non può 
essere utilizzato nemmeno per eseguire PLOT. PLOTST e SCRIPT. 


Pausa per immissione dati da parte dell'utente 


Se un comando di AutoCAD è in esecuzione e incontra il simbolo predefinito di PAUSA in 
qualità di argomento della funzione COMMAND, la funzione verra sospesa per permettere 
all'utente di immettere dei dati oppure di procedere ad un trascinamento. PAUSA svolge quindi 
il medesimo ruolo della barra rovesciata per i menu. 


Se ricniamate un comando trasparente menire la funzione COMMAND è sospesa, questa rimarrà 
tale. L'utente potra quindi eseguire tutti i PAN e gli ZOOM desiderari mentre la funzione 
permane in pausa. La pausa rimane valida finchè AutoCAD non ottiene l'immissione dei valori 
richiesti e i comandi trasparenti sono disazionati. Ad esempio: 


(conmand "cerchio" "5,5" pause "linea" "5,5" "7,5" "") 


imposta il comando CERCHIO, assegna al punto centrale le coordinate 5,5 € inserisce una pausa 
per permettere all'utente di trascinare il raggio del cerchio sullo scnermo. Quando l'utente ha 
selezionato il punto col puntatore oppure ne ha digitato le coordinate, la funzione riprende 
disegnando una linea da 5.5 a 7,5. 


Le selezioni dal menù non vengono sospese dalla pausa in AutoLISP. Se una voce di menù è 
attivata mentre la funzione di COMMAND è in pausa in attesa dell'immissione dati, i dati 
possono essere immessi dal menù. Se invece desiderate che anche la voce di menù venga sospesa 


dovete aggiungerle una barra rovesciata. Dopo che sono stati immessi i dati richiesti sia la 
funzione COMMAND che la voce di menu torneranno 3 funzionare regolarmente. 


NOTE: 


1. Il simbolo di pausa è solitamente costituito da una stringa contenente una barra 
rovesciata. Potete impostare una barra rovesciata singola. senza servirvi del simbolo 
di pausa. ma se la funzione di COMMAND è richiamata da una voce di menù, la 
barra rovesciata otterrà l'effetto di sospendere non la funzione COMMAND ma 
piuttosto la voce di menù dopo che è stato letta. ll dispositivo di pausa potrà 
eventualmente aver bisogno di un valore di stimolo differente nelle versioni 
successive di AutoLISP. Di conseguenza consigiiamo di utilizzare il simbolo di 
PAUSA invece di una semplice barra rovesciata. 


vo 


Se si incontra una pausa mentre un comando è in attesa di una stringa di resto o del 
valore di un attributo, AutoCAD entrera in pausa per l'immissione del daro solo se 
la variabile di sistema TEXTEVAL è impostata con un valore differente da zero. 
Altrimenti. il valore del simbolo di pausa (la barra rovesciata) verrà preso per il 
testo e non provocherà nessuna pausa. 
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Quando una funzione di COMMAND è stata sospesa per l'immissione di un dato. 


(De) 


sat tale funzione verra considerata ancora attiva, in modo che l'utente non potra 
sa richiamare un'altra espressione di AutoLISP per valutaria. 

Y 

am 







4, (ce <% >_< = PAMESA 


Questa funzione accetta una numero qualsiasi di liste come argomenti e valuta il primo elemento 
di ogni lista (nell'ordine specificato) finché uno di questi elementi restituisce un valore diverso 
da NIL. A questo punto la funzione valuta quelle espressioni che seguono il test aifermativo e 
restituisce il valore dell'ultima espressione nella sottolista. Se è presente solo un'espressione neila 
sottolista (se manca <risultato>, ad esempio), viene restituito il valore dell'espressione <tesb. 
COND è la funzione condizionale principale in AutoLISP. 


. % Nell'esempio seguente, COND viene usato per calcolare un valore assoluto. 
in (cond ((minuso a) (- a) 
(t a) 
) 
ar 
Ioni Se ad "a" è stato dato il valore -10. si ottiene 10. Solitamente T viene usato come espressione 


<tesp standard. Aggiungiamo un ulteriore esempio. Data una stringa di risposta che indichiamo 
coi simbolo "5", questa funzione valuta la risposta è restituisce | se tale risposta ccrrisponce 2 
"YY 0"y" cioe si, e 0 se la risposta è "N" o "n° cioe no. negli altri casi si ottiene NIL. 


(cond ((= 
((= 


yy) 1) 

ty) 1) A ia a 
((= "N") 0) 

((® sn") 0) 

(tt nil) 


i (cons <nuovo primo elem c> <lista>) 


Questa è la funzione principale che costruisce liste «CONStructor) ; essa. partendo da ur 
elemento (<nuovo primo eiemento>) e una lista (<lista>ì. restituisce la somma cell'elemento 
all'inizio deila lista. Esempi: 


(cons 'a '(bc d)) restituisce (A 3 D) 
(cons '(a) '(bc d)) restituisce ((A) CD) 


vo 


Si noti che il primo elemento può essere un atomo 0 una lista. 


CONS puo accettare anche un atomo al posto dell'argomento della <iista>. formanco così una 
Struttura conosciuta come coppia puntata. Quando visualizza una coppia puntata. AutoLISP pone 
Una virgola 0 un puntino tra il primo elemento e il secondo. La funzione CDR puo essere 
Utilizzata per restituire il secondo atomo di una coppia puntata. 

Abbiamo quindi: 


(cons 'a ‘b) restituisce A. 2) 
(car (cons 'a ‘5)) restituisce À 
(cdr (cons ‘a 'D))} restituisce 3; 
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Una coppia puntata è da considerarsi come un tipo particolare di lista e non viene accettata 
come argomento di determinate funzioni che gestiscono liste di tipo normale. 
4,37_ ‘cos <an o> 


Questa funzione restituisce il coseno di un <angolo>, in cui <angolo> è espresso in radianti. 
Esempi: 


{cos 0.0) restituisce. 1,0 
{cos pi) restituisce -1.0 





DEFUN definisce una funzione con il nome <sim> (si noti che il nome della funzione viene già 
restituito letteralmente). Il nome della funzione è seguito da una lista di argomenti 
(eventualmente vuota) che a sua volta puo essere seguita da una barra obliqua e dai nomi di una 
o di più simboli locali della funzione. La barra deve essere separata dal primo simbolo locale e 
dall'ultimo argomento (nei casi in cui ne esiste uno) da almeno uno spazio vuoto. Se non sono 


presenti ne argomenti nè simboli locali. occorre fornire una serie di parentesi vuote dopo il 
nome della funzione. Ad esempio: 


(defun myfunc (x Y) +0.) (la funzione dispone di due argomenti} 

(defun myfunc (/ a Db) ... ) (la funzione dispone di due simboli locali) 
o È {defun myfuns (x / temp) ... )fun argomento e un simbolo locale) 

(defun myfunc () 0. ) {nessun argomento 0 simbolo locale) 


La lista degli argomenti e delle variabili locali e seguita da una o più espressioni da valutare 
quando la funzione viene eseguita. 


DEFUN restituisce il nome della funzione che è stata definita. Quando la funzione definita è 
richiamata. i suoi argomenti saranno valutati e legati ai simboli degli argomenti. Le variabili 
locali possono essere usate all'interno della funzione senza che venga modificato il loro legame ai 
livelli esterni. La funzione restituirà il risultato dell'ultima espressione valutata. Tutte le 
espressioni precedenti hanno solo effetti secondari. La funzione DEFUN restituisce il nome della 
funzione definita. Per esempio: 


(defun addl0 (x) 


(+ 10 x) 
) restituisce ADDIO 
(adel0 5) restituisce 15 
(addl0 -7.4) restituisce 2.6 


e 


(defun punti (% Y / temp) 
(seta temp (streat * Vins 8)) 
(strcat temp Y) 


) . restituisce PUNTI 
(punti "a" UD") restituisce 'a...b" 
(punti "da" "a") restituisce taa.,..a" 





sata 
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Bisogna stare autenti a non usare mai il nome di una funzione incorporata o di una variabiie come 
<sim>. dato che ciò renderebbe ia funzione incorporata inaccessibile. 


4 ibreri funzi. i i 


Le definizioni di funzioni possono essere memorizzate in files e caricate mediante la funzione 
LOAD di AutoLISP, descritta più avanti in questo capitolo. Se esiste il file "acad.lsp*, AutoLISP 
lo caricherà automaticamente ogni volta che si richiama l'Editore di Disegni di AutoCAD: si 
possono usare queste funzioni per creare una libreria delle funzioni comuni in modo che siano 
sempre accessibili. 


Ogni file di libreria del tipo “lsp.* può contenere, oitre a DEFUN, anche altre espressioni. Dal 
momento che il caricamento di un file induce ia valutazione di queste espressioni. potete 
automatizzare il richiamo di queste funzioni ogni volta che questo file viene caricato. Va notato 
però che il caricamento di *acad.lsp" avviene prima che l'Editore di disegni di AutoCAD sia 
pienamente inizializzaro, per cui vi sconsigliamo di utilizzare la funzione COMMAND nei fi ile 
"acad.Isp" al di fuori di un DEFUN. Per fare in modo che il vostro file “acad.lsp" esegua una 
serie di comandi automaticamente dopo essere stato caricato. inciuderete un DEFUN della 
funzione speciale “S:STARTUP®. Rimanaiamo ai capitoletti seguenti per dettagli. 


4.38,2 Funzioni C:XXX -- Aggiungere comandi AutoCAD 


Si possono aggiungere nuovi comandi ad AutoCAD mediante DEFUN per definire delle funzioni 
che implementino questi comandi. Per poter essere usate come comandi in AutoCAD, tali 
funzioni devono seguire le regole seguenti: 


I. La funzione deve avere un nome del tipo "C:XXX®", in cui tutte le lettere sono maiuscole. 
La parte “C:" del nome deve sempre essere presente: la parte “XXX" puo essere ii nome 
di un comando a scelta, con la restrizione che non deve essere il nome di un comando 
già esistente in AutoCAD, compresi i comagci scritti dall'utente. 


2. La funzione deve essere definita con una lista di argomenti NIL (ma sono permesse 
variabili locali), 


L'esempio che segue definisce una funzione che disegna un quadrato usando polilinee. 


(defun C:PQUADRATO (/ pil pt2 st3 sc lune) 
(setq ptl (getpoint "Vertice in basso a sinistra: ")) 
(setg lung (getdist ptl "Tunghezza lato: ")) 
(seta pt2 (polar ptl 0.0 lung)) 
(setg pt3 (polar pre2 (/ FI 2.0) lung}} 
(setq pt4 (polar pt3 PI Llung)) 
(command "PLINEA" ptl pr2 pt3 pr4 "C"} 
) 


Le funzioni definite in questo modo possono essere richiamate semplicemente immettendo il 
Rome della funzione quando appare il messaggio "Comando :" di AutoCAD, Se "XXX" ron è un 
comando, AutoCAD prova a richiamare la funzione "C:XXX" di AutoLISP con zero parametri. 
Per ia funzione C:PQUADRATO dell'esempio precedente, il dialogo sarebbe: 


Comando: PQUADRATO 
Vertice in basso a sinistra: (immettere un rstoi 
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Lunghezza lato: ‘immettere uno. distanza) 


In seguito, la funzione richiamerebbe il comando PLINEA di AutoCAD e risponderebbe alle 
ricnieste per disegnare il quadrato richiesto, 


Aggiungere comandi ad AutoCAD con questo metodo è una caratteristica molto potente di 
AutoLISP. Il nome del nuovo comando non deve essere scritto fra parentesi quando lo ssi usa, 


infatti il comando implementato è trattato come un qualsiasi altro comando di AutoCAD. 


4,38,3 Funzioni SUXXX - Esecuzione auiomatica 


Funzioni definite dall'utente i cui nomi iniziano con "S:" verranno richiamate automaticamente 
ouvando si presentano determinate situazioni durante una sessione di editazione. Il prefisso oto 


va quindi considerato come “riservato”. Per evitare conflitti con funzioni che non hanno niente a 


che vedere, raccomandiamo di utilizzare questo prefisso per Quesio Upo di funzioni speciali. 


AI momento. l'unica funzione ad esecuzione automatica è "S:ST ARTUP®. Se questa funzione 
viene definita, verra richiamata automaticamente (senza argomenti) al momento di entrare 
nell'Editore di disegni di AutoCAD per creare un nuovo disegno 0 editare un disegno già 
esistente. E° possibile naturalmente includere un DEFUN di “STARTUP” nel vostro file 
“acad.Isp" per eseguire operazioni di impostazione prima di cominciare a lavorare con l'editore. 


Ad esempio, supponiamo che si desideri sostituire la versione standard dei comandi USCIRE e 
FINE con una versione personale di tali comandi. E' possibile fare questo con un file "acad.isp” 
contenente quanto segue: 


(defun C:IUSCIRE () 
... la vostra definizione ... 


) 
(defun C:FINE () 
... la vostra definizione ... 


) 

(defun S:STARTUP () 
(ccunmanà SNUOVDET" "USCIRE") 
(cenmand “NUOVDET" NTINE") 


439 (distance <oti> <c22> 
Questa funzione restituisce la distanza tra i punti tridimensionali <ptl> e <pid>. Esempi: 


(distance '(1.0 2.5 3.0) '(7.7 2.5 3.0)) restituisce 6.7 
(distance '(2.0 2.0 0.5) 1(3,0 4.0 0.5)) restituisce 2.82843 


Se la variabile di sistema FLATLAND è diversa di 0. DISTANCE si aspetta l'immissione di 
punti bidimensionali (e ignora le componenti Z se vengono forniti punti 3D) e restituisce la 
Gistanza bidimensionale tra i punti come se fossero proiettati sul piano di costruzione corrente. 


Lo stesso si verifica se FLATLAND è diversa da 0 e uno o entrambi i punti forniti sono 
tidimensionali. 


dieta rst 


tigre. 


£ 


$ 
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eq_<e > <espr2>) 


ta funzione verifica se <espri> e <espr2> sono identiche, cioé se sono legate allo stesso 
erro (da SETQ, per esempio). EQ restituisce T se le due espressioni sono identiche e NIL in 
caso contrario. L'uso tipico di questa funzione è quello di determinare se due liste sono 
identiche. Determinando per esempio quanto segue: 


(setq fl ‘(a bc)) 
(setq £2 '(a b c)) 
(setg £3 £2) 


allora: 


enti (equal £1 £2) restituisce NIL (/le f3nonsonola stessa lista) 
(equal £3 2) restituisce n (13 e f2 sono esattamente ia stessa lista) 


Vedi anche la funzione EQUAL, qui di seguito. 


4,41 (equal <espri> <espr2>) <appressimazicne> 


Questa funzione verifica se <espri> e <espr2> sono identiche. cioe se la loro valutazione da lo 
stesso risultato, Determinando per esempio quanto segue: 


(setq £1 '(a bc)) 
(setg £2 '(abec)) 
(setq £3 £2) 


allora: 


(eq £1 £3) restituisce T (11 e f3 danno lo stesso risultato) 
(eq 223 £2) restituisce T (/3 e {2 sono esattamente la stessa lista; 


Si noti che due liste identiche (EQUAL) non sono necessariamente EQ, mentre atomi che sono 
"sora sono sempre anche EQ. Inoltre, due liste o atomi qualsiasi che sono EQ, sono sempre 
UAL. 


Nel paragonare due numeri reali (0 due liste di numeri reali, come nel caso di punti) è 
importante tenere presente che due numeri “identici” possono differire leggermente se sono stati 
utilizzati due metodi differenti per calcolarii. Con l'aiuto dell'argomento numerico opzionale 
<approssimazione> si può specificare la differenza massima che puo intercorrere tra <espri> e 
<espr2> senza che queste vengano già considerare differenti. Ad esempio, dati: 


(setq a 1.123456) 
(setg b 1.123457) 


allora: 


(equal a Db) restituirebbe NIL 
(equal a b 0.00001) restituirebbe T 


si 


4,4 val <es 


Restituisce il risul 
qualsiasi. Derermin: 


(setq a 
(seta Db 


allora: 


(eval 4. 
(eval (2 
(eval a. 
(eval D° 


4.43 eXo_enur 


Questa funzione re 
un numero reale. I 


(exp 1.C 
(exp 2.2 


(exp -0. 
4.44 ( i <2 


Questa funzione 
sono interi. il risu 


(exp 
(exp 


ti kr 


4,4 si nà sil 
27 da L 
Questa funzione 
AUO0CAD una fi. 
seguito dall'elen: 
menzionato dalla 
file di programmi. 


FINDFILE non : 
desiderate un ric 
nome non è qua. 
file e ne restitu: 
viene fornito un 
esegue quindi | 
FINDFILE puo 
come. separatore . 
N.) 


dino 
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sione di <espr> in cui 
quanto segue: 


restituisce 4.0 
restituisce 10 

restituisce 223 
restituisce 123 





restituisce 
restituisce 
restituisce 


ante> ) 


a ica 
elevato all'<esponente> specificato. Se entrambi gli argom 
in caso contrario il risultat@,& cn numero reale. Esempi: 














restituisce 26 
restituisce 9.0 
22) 


arammi utente di cerca; 
sentiero di libreria Auto 
file di disegno corrent 
inte ACAD (se specificato; 


‘odo da cercare un tipo di 
vete fornire esplicitamenti 
one cioè di prefisso di un 
‘ificaro o NIL. se non troy 
disco/elenco. AutoCAD c@E 
> il sentiero di libreria 
dalla funzione OPEN. (Néi 
sell'elenco, in PC-DOS/Mj 


tipo del file da ricercare. 
disso/elenco), AutoCAD ce 










lì esempi: seguenti utilizzian 
DOS. sj può utilizzare sia ”, 
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Ad esempio, supponiamo che: 


» l'elenco corrente è "/acad” e contiene il file "abc.lsp”. 

e stiamo editando un disegno nell'elenco “/icad/disegni" 

» la variabile d'ambiente ACAD contiene l'indicazione "/acad/ausiliario" 
» il file "xvz.txt" esiste solo nell'elenco "/acad/ausiliario” e 

e il file "nessuno" non è presente in nessun elenco sui sentiero di libreria. 


Allora: . 
(findfile "abc.lsp") restituirebbe "/acad/abc.lsp" 
(findfile "xyZ.txt"  restictuirebbe n/acad/ausiliario"xyz.txt" 
(findfile "nessuno”) restituirebbe NIL 

4,4 (e <nuUn > 


Questa funzione restituisce la eanversione del <numero> in un intero: il <numero> può essere un 
intero 0 un reale. Se è reale. viene approssimato all'intero restante dopo aver eliminato le ciîre 
dopo la virgoia. Ad esempio: 


(fix 3) restituisce 3 
(fix 3.7) restituisce 3 
4471 (#1 < > i e 


Questa funzione restituisce la conversione del <numero> in un numero reale. Îl <numero> può 
essere intero 0 reale. Esempi: 


(float 3) restituisce 2.0 

(float 1.75) restituisce 3.75 
1,48 (foreach < e> <)ista> <espr>... 
Questa funzione percorre la <:ista> assegnando un <nome> ad ogni elemento e valutando ogni 
<espr> per cgni eiemento nella lista. Si puo specificare un numero qualsiasi di espressioni. 
FOREACH restituisce il risultato dell'ultima <espr> valutata. L'esempio: 

(foreacna n '(a b c) (print n)) 
è equivalente 2 

(print a) 

(print Db) 

(print c) 


solo che FOREACH restituisce unicamente il risuita:o della valutazione dell'ultima espressione. 
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4,49 < >_< > 


Questa funzione restituisce il maggiore denominatore comune di <numi> e <num?>, che devono 
essere interi: Esempi: 


(gcdà 81 57) restituisce 3 
(ged 12 20) restituisce 4 
dA getangle f<pt>) i<richiesta>) 


Questa funzione introduce una pausa per permettere all'utente di immettere un angolo. 
<richiesta> è una stringa opzionale che viene visualizzata come messaggio di richiesta e <pt> è 
un punto opzionale di base 2D nell'UCS corrente. L'angolo restituito € espresso in radianti ed è 
rslativo al piano di costruzione corrente {il piano XY dell'UCS corrente all'elevazione corrente). 


T' possibile specificare un angolo digitando un numero nel formato di unità di misura per angoli 
sorrente in AutoCAD: comunque. anche se il formato corrente di unita angolari è in gradi 


sessagesimali o centesimali. questa funzione restituisce sempre un angolo in radianti. 


Si puo anche "indicare" ad AutoLISP l'angolo desiderato puntando su due posizioni 
bidimensionali dello schermo grafico. Durante questa operazione AutoCAD visualizza un cursore 
a linea elastica dal primo punto alla posizione corrente del puntatore a cross, per facilitare la 
selta del secondo punto. L'argomento opzionale di GETANGLE, <pt>. viene interpretato (se 
ssecificato) come primo dei due punti da specificare. E' possibile specificare un punto di base 
5D ma potrebbe creare confusione dal momento che l'angolo viene sempre misurato nel piano di 
costruzione corrente. Esempi: 


(setog ang (getangle)) 

(seta ang (getangle ‘(2.0 3.5)) 

(seta ang (getargie "In quale Girezione? ") 

(sete ang (getangle ‘11,0 3.5) "In quale direzione? ") 


Non si può immettere un'altra espressione LISP in risposta a una richiesta di GETANGLE. Se lo 
: facesse, si otterrebbe il messaggio "Can reenter AutoLISP" (impossibile rientrare in 
AutoLISP). Per ulteriori informazioni vedi GETORIENT e INITGET. 


451 (getcornet «punto? r<qmessacci >) 


La nuova funzione getcorner restituisce Un pUnIo nell'UCS corrente. esattamente come 
GETPOINT. l'unica differenza è che GETCORNER esige un argomento di tase del punto <pt> 
» disegna un rettangolo partendo da questio punto seguendo il movimento sullo schermo che 
viene fatto con l'aiuto del puntatore. Per ulteriori informazioni vedi GETORIENT e INITGET. 


I punto di base è espresso relativamerne all'UCS corrente. Se viene fornito un punto 3D. la sua 
somponente Z viene ignorata e l'elevazione corrente viene utilizzata come valore per la Z. 


Non è possibile immettere nessun'altra espressione di AutoLISP in risposta alla richiesta di 
GETCORNER. 
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4 faer {<pe>! _ "< i >1) 


Questa funzione introduce una pausa per permettere all'utente di immettere una distanza. 
<richiesta> è una stringa opzionale che viene visualizzata come messaggio di richiesta e <p è 
un punto °D o 3D di base opzionale appartenente all'UCS corrente. E' possibile specificare una 
distanza digitando un numero nei formato di unità di misura per distanze corrente di AutoCAD: 
comunque la funzione restituisce sempre una distanza come numero reale. 


Si puo anche indicare ad AutoLISP la distanza desiderata puntando su due posizioni dello 
schermo grafico. Durante questa operazione AutoCAD visualizza un cursore 2 linea elastica dal 
primo punto alla posizione corrente del puntatore a croce, per facilitare la scsita del secondo 
punto. L'argomento opzionale di GETDIST, <pv, viene interpretato (se specificato) come primo 
dei due punti da specificare. 


Se utilizzate il metodo dei due punti, GETDIST controlla la variabile di sistema FLATLAND e 
l'identificatore di controllo per punto tridimensionale della funzione INTTGET per determinare 
la maniera in cui deve calcolare la distanza. Se FLATLAND è 0, restituisce la distanza 5D tra i 
due punti. Se FLATLAND è diverso da 0, restituisce una distanza 3D solo se l'identificatore di 
punto 3D di INITGET è impostato, altrimenti si comporta come se rossero stati forniti punti 2D. 


Esempi: 

(setg dist (gecdlist)) 

(setg dist (gaetcdist '(1.0 3.5)) 

(setg dist (getaist "Lungo quanto? ") 

(setg dist (getiist '(1.0 3.5) "Lungo quanto? ") 
Non si puo immettere un'altra espressione LISP in risposta a una richiesta di GETDIST. 
Rinviamo a INITGET. 
4 (e iv < della variabile>) 
Questa funzione restituisce ii valore di stringa assegnato a una variatile d'ambiente. L'argomento 
<nome della variabile> è una stringa che specifica ii nome della variabile che deve essere letta. 


Se questa variabile non esiste. AutoLISP restituisce NIL. 


Ad esempio. se la variabile d'ambiente ACAD contiene “’acadrausilizrio” è non ssiste nessuna 
variabile che sia chiama NESSUNO, allora: 


(getenv "ACAD") restituirenbe “/acad/ausiliario/" 
{(getenv "NESSUNO") restituireste NIL 


Va notato che nei sistemi tasati su UNIX, "ACAD" e "acad” vengono considerate come due 
variabili differenti, dato che UNIX distingue tra maiuscole e minuscole. 
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484 (oeti f<richiesza>) 


Questa funzione introduce una pausa per permettere all'utente di immettere un intero € 
restituisce quell’intero. 1 valori possono essere compresi nell'intervallo da -32768 a +32767. 
<richiesta> è una stringa opzionale che viene visualizzata come messaggio di richiesta. Ad 
esempio: 


(seta numero (getint) ) 
(setq numero (getint "Immettere un numero: “)) 


Non si può immettere un'altra espressione LISP in risposta a una richiesta di GETINT. 
Rinviamo a INITGET. 


4,83 _(qetkwo femnessacgio>) 


La funzione GETKWORD richiede da parte dell'utente l'immissione di una parola chiave. 
Utilizzando la funzione INITTGET (descritta più sotto), si ottiene una lista delle parole chiave 
valide. GETKWORD restituisce la parola chiave corrispondente a quanto immesso dall'utente. 
trasformandola in una stringa di caratteri. AutoCAD riprovera se quanto immesso non 
corrisponde 2 una delle parole chiave. Un'immissione nulla (se permessa) provoca la risposta 
NIL. Si ottiene NIL anche quando non si è stabilita nessuna stringa contenente una parola 
chiave. Ad esempio: 


(initget 1 usi No") 
(setq x (getword sei sicuro?.(Si 0 No)")) 


chiederà all'utente di rispondere Si oppure No € porrà una X in corrispondenza della risposta 
ottenuta. Se la risposta non corrisponde a nessuna delle parole chiave, AutoCAD chiederà 
all'utente di riprovare. 


Non si può immettere un'altra espressione di LISP in risposta ad una richiesta di GETKWORD. 
Rinviamo 9 INITGET. 


4,8 cererient toro ti< ggio>) 


In AutoLISP gli angoli sono sempre rappresentati in radianti, con la direzione 0 volta verso 
destra e gli angoli crescenti in senso trigonometrico. Nei casi in cui l'utente ha scelto una 
direzione differente per il radiante 0 o perla crescita degli angoli si rivelano necessarie alcune 
riconversioni, realizzabili tramite il comando UNITA o le variabili di sistema ANGBASE e 


ANGDIR. 


La funzione GETORIENT è simile a GETANGLE ma, per quanto riguarda la base di 0 gradi € 
la direzione di crescita dell'angolo. si comporta diversamente da GETANGLE. GETANGLE 
dovrebbe essere usata quando si vuole sapere il valore di una rotazione (angolo relativo), mentre 
GETORIENT va usata se si vuole sapere l'orientamento (angolo assoluto). 
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Supponiamo che il comando UNITA sia 
stato impiegato per selezionare un angolo di 
90 gradi (a nord) e il senso orario come 
direzione di crescita dell'angolo. La tabella 
seguente mostra quali valori (in radianti) 
GETORIENT e GETANGLE emetteranno 
come valori rappresentativi per l'input (in 
gradi) da parte dell'utente. 


Inputigradi) | GETANGLE Ì GETORIENT 
. i 
i | 












180 3, 14159 46.71239 
90 6.71239 0.0 


Come mostra la tabella, GETANGLE rispetta la direzione dell'angolo, ma ignora la direzione di 
0 gradi. E° naturalmente possibile impiegare GETANGLE per ottenere un'ampiezza di rotazione 
per l'inserimento di un blocco, dal momento che 0 gradi corrispondono sempre a 0 radianti. 
GETORIENT, invece, rispetta sia la direzione di 0 gradi che il senso di crescita dell'angolo. Si 
può quindi usare GETORIENT per ottenere angoli come quello della linea di base per una voce 
di testo. Ad esempio, se tramite il comando UNITA si è selezionato un angolo di 90 gradi. la 
linea di base secondo cui si orientera una normale linea di testo orizzontale sarà di 90 gradi. 


Come per GETANGLE, l'angolo restituito sara espresso in radianti e sara relativo ai piano di 
costruzione corrente. 


Non è possibile immettere un'altra funzione di LISP in risposta ad una richiesta di 
GETORIENT. Rinviamo a GETANGLE e a INITGET. 


4,567_(0a ine f<ot>1) f<richi >1 


Questa funzione introduce una pausa per permettere all'utente di immettere un punto. <pt> è un 
punto 2D o 3D opzionale di base relativo all'UCS corrente e <richiesti> è una stringa opzionale 
che viene visualizzata come messaggio di richiesta. E° possibile specificare un punto mediante 
puntamento o digitandone le coordinate nei formato di unita di misura corrente. Se è presente 
l'argomento opzionale <pt, AutoCAD visualizza un cursore a linea elastica da quel punto alla 
posizione corrente dei puntatore 2 croce. GETPOINT restituisce un punto, cioé una lista di due 
numeri reali, Esempi: 


(satg p (gatpoint)) 
(setg P (getpoine "Dove?")) 
(setq p (getpoint '(1.5 2.0) "Secondo punto: ")): 


Il punto restituito è espresso relativamente all'UCS corrente. Se la variabile di sistema 
FLATLAND è 0, GETPOINT restituisce un punto 5D. altrimenti viene restituito un punto 2D a 
meno che INITGET non sia stata utilizzata per apporre un icdentificatore di controllo per punto 
tridimensionale, in tal caso il punto restituito sara 3D. 


Non si può immettere un'altra espressione LISP in risposta 3 una richiesta di GETPOINT. 
Rinviamo a GETCORNER e INITGET. 
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48 f<ri i > 


Questa funzione introduce una pausa per permettere all'utente di immettere un “numero meale € 
restituisce quel numero reale. <richiesta> è una stringa opzionale che viene visualizzara come 


messaggio di richiesta. Esempi: 


{setq val (getreal)) 
(setq val (getreal vpattore di scala: ")) 


Non si può immettere un'altra espressione LISP in risposta a una richiesta di GETREAL. 
Rinviamo a INITGET. 


4,59 erserino [<cr2) r<richiesta?> 


GETSTRING introduce una pausa per permettere all'utente di immettere una stringa * 
restituisce quella stringa. Se la stringa supera i 132 carameri. solo i primi 132 caratteri verranno 
restituiti. Se <cm> € presente ed è diverso da NIL, la stringa immessa può contenere spazi vuoti 
(e deve quindi essere conclusa da RETURN). <richiesta> e una stringa opzionale che viene 
visualizzata come messaggio di ricniesta. Esempi: 


(setq 5 {getstring) ) 
(setq Ss (getstrìing "cognome? ")) 
(sete s {getsring T "Nome e cognome? ")) 


Se l'input dell'utente corrisponde ad una delle opzioni (parole chiave), è possibile utilizzare la 
funzione GETKWORD, descritta più sopra. al posto di GETSTRING. 


Non si può immenere un'altra espressione LISP in risposta a una richiesta di GETSTRING. 


4 _fgegvar < variabile> 


Questa funzione restituisce il valore di una variabile di sistema di AutoCAD. Il nome della 
variabile deve essere scritto in maiuscolo € tra virgolette. Supponendo ad esempio che l'ultimo 
raggio di raccordo specificato sia di 0.25 unita 


{getvar FILLETRAD") restituirebbe 0.25 
Se cercate di utilizzare GETVAR per restituire il valore di una variabile di sistema sconosciuta 


ad AutoCAD, otterrete NIL. Rimandiamo all'Appendice A della Guida all'Uso di AutoCAD per 
l'elenco delle variabili di sistema correnti di AutoCAD. Vedi anche la funzione SETVAR. 


d 61 terashscer) 
La funzione GRAPHSCR cambia dallo schermo testo ® quello grafico su sistemi monoschermo 


istesso effetto del tasto "FLIP SCREEN” di AUoCADÌ. GRAPHSCR restituisce sempre NIL. 
Vedi anche la funzione TEXTSCR. 
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162 (‘if <espr test> <espr then> f<espr elge>!) 


Questa funzione valuta espressioni in modo condizionale: se <espr test> è diversa da NIL, valuta 
l'<espr then>. In caso contrario valuta l’<espr eise>, che e opzionale. IF restituisce il valore 
dell'espressione selezionata; se <espr else> manca e <espr test> è diversa da NIL, IF restituisce 
NIL. Esempi: 


(if (= 1 3) "SIl!" "no. ") restituisce "no." 
(if (= 2 (+ 1 1)) "SI!!") restituisce USTIIE 
(if (= 2 (+ 3 4)) "SII!I") restituisce NIL 

4 (initget_ f< >I_f< pi >I 


Questa nuova funzione mette a disposizione varie opzioni impiegabili con la funzione di GET 
chiamata in seguito (eccezion fatta per le funzioni GETSTRING e GETVAR). INITGET 
restituisce sempre NIL. L'argomento opzionale <bits> è un numero intero con Questi valori: 


Bits di INITGET | Significato 











1 | Respinge veni 2ut nutlo 
2 | Respinge tutti | vatori uguali a 0 
‘ | Respinge tutti i vetori negativi 







a [in controtla i iimiti, anche quando LINCHECK è 


inserito 






Restituisce punti tridimensionali invece che 


1a | bidimensioneii 


I bits possono essere combinati tra loro in tutte !s maniere possibili per formare un valore tra 0 
e 63. Nelle versioni future di AutoL.ISP potranno essere inseriti ulteriori bits di controllo 
INITGET. è perciò consigliabile evitare l'uso ci bits non documentati. Se la variabile di sistema 
FLATLAND è 0 si suppone che l’identificatore di controllo per punto tridimensionale sia stato 
impostato. 





Utilizza Linee :ratteggiare per disegnare la 
linea elastica e i riquadri di selezione 





Se l'immissione dell'utente non corrisponde ad una o più condizioni postulate (ad esempio viene 
immesso un valore 0 quando si è stabilito che i valori 0 non sono validi), AutoCAD visualizzera 
un messaggio e chiederà all'utente di riprovare. ad esempio: 


(initget (+ 1 2 4)) 
(setg age (getint "Quanti anni hai? ")) 


se viene inserito un valore nullo, negativo o pari a 0, l'utente riceverà immediatamente il 
messaggio che gli chiede di immettere altri vaiori. Se non viene fornito nessun argomento <bits>. 
0 (nessuna condizione) viene assunto come v2iore. I valori di controllo speciali sono accettati 
solo da quelle funzioni di GET per le quali hanno senso. come vediamo nella tabella seguente. 


La valore di controllo 32 viene accettato dalle funzioni GETPOINT, GETCORNER. GETDIST. 


GETANGLE e GETORIENT quando viene fornito un punto di base e le induce ad utilizzare 
linee tratteggiate ( o evidenziate in una qualunque altra forma) per visualizzare la linea elastica 
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o il cursore 3 riquadro che partono dal punto base indicato. Se la variabile di sistema POPUPS 
corrisponde 3 zero. indica cioè che il programma di gestione dei dispositivi di visualizzazione 
non gestisce l'interfaccia utente avanzata. AutoCAD ignorerà questo valore INITGET. 





cETCORNER | * | om pe 


L'argomento <stringa> opzionale di INITGET definisce una lista di parole chiave a scelta da 
verificarsi appena viene chiamata una funzione di GET se l'utente non esegue l'immissione 
prestabilita (es. non inserisce un punto con la funzione GETPOINT). Se quanto immesso 
dall'utente corrisponde ad una delle parole chiave della lista. la parola chiave selezionata viene 
restituita dalla funzione GET iz azione come risultato e sotto forma di stringa. ll programma 
utente è in grado di controllare ogni singola parola chiave € eseguire l'azione richiesta da 
ciascuna. Se l'immissione dell'utente non è del tipo prestabilito e non corrisponde a nessuna 
parola chiave. AutoCAD chiederà di riprovare. 


La lista delle parole chiave deve essere del tipo "Chiavel Chiave? Chiaves. ABBREV35". Le 
singole parole chiave vengono separate da spazi. Abbreviazioni sono opzionali e possono 
avvenire in due modi diversi. La porzione richiesta può essere in lettere maiuscole e il resto in 
minuscolo, oppure ta porzione richiesta può essere ripetuta e separata dalla parola chiave con 
una virgola. La seconda maniera è adatta a favorire applicazioni realizzate in lingue straniere. 
nelle quali ia riconversione mi uscolo-maiuscolo puo essere difficoltosa 0 impossibile. Con 
entrambi i metodi. l'abbreviazione deve essere inserita correttamente e in tutta la sua lunghezza. 
Ad esempio: 


STTPOLINEA,TI" e 
“TIpolinea" 


sono specificazioni equivalenti. Entrambi indicano che l'immissione da parte dell'utente di 
“TIPOLINEA". "TIPO", "TIP" : "TI" è considerata accettabile, "I° però non è sufficiente e 
“TIPOSNAP" a "TIPREF" non ccrrispondono a quanto desiderato. 
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Consideriamo la seguente funzione applicativa: 


(defun getnum ( / Xx} 
(initget l "Pi Due-Di") 
(setg x (getreal "Pi/Due-pi/<nunero>: ")) 
(cond ((eq x "Pli") pi) i 
((@q x "Due-Pi") (+ 2.0 pi)) 
(T x) 


) 


Questa funzione INITTGET vieta ogni immissione nuila e stabilisce una lista di 2 parole chiave. 
“Pi* e "Due Pi". GETREAL viene quindi usato per ottenere un numero reale in risposta al 
messaggio "Pi/Due-pi/<numero>:”, il risultato è posto nel simbolo locale X. Se l'utente immette 
un numero, questo numero viene restituito dalla funzione GETNUM. Però, se l'utente inserisce 
il numero chiave "Pi" (o semplicemente "P°), GETREAL restituirà la parola chiave "Pi". La 
funzione COND si accorge di questo e restituisce il valore di pi. Con la parola chiave “Due-Pi" 
succede la medesima cosa. 


Gli identificaiori e la lista delle parole chiave sicdiliti da INITGET si applicano siie chiamate 
seguenti di tnpo GET e vengono successivameme chbandonati. Questo evita cll'usente di dover 
eliminare queste condizioni speciali quando chiama un'altra funzione. 


41.64 ‘insers <prl> <ot2> <ot2> <ot4> '’<sulsec>] 


La funzione INTERS esamina due linee e restituisce il punto in cui intersecano o NIL se non 
intersecano. <pti> <pr2> sono le estremità della prima linea e <pr3> <pt4> sono le estremita della 
seconda linea. Tutti i punti sono espressi relativamente all'UCS corrente. Se la variabile di 
sistema FLATLAND è 0 e tutti e quattro gii argomenti di punto sono 3D, INTERS controlla se 
esistono intersezioni 3D, se non ne trova, INTERS proietta le linee sul piano di costruzione 
corrente e cerca solo le intersezioni in 2D. 


Se l'argomento opzionale <su!seg> è presente ed è NIL. ‘a linee verranno considerate di 

lunghezza inrinita e INTERS restituirà il punto in cui intersecano, anche se questo si trova oltre 

l'estremita di una o di entrambe le linee, Se l'argomento opzionale <sulseg> non e vresente 0 non 

è NIL. il punto d'intersezione deve trovarsi su entrambe le linee. in caso contrario INTERS 
restituira NIL. Ad esempio, se: 

(seta a '(1.0 1.0) b'(9 

‘(4. . 


+0 9.0)) 
(setg c '(4.0 1.0) d o 2.0)) 


allora: 
(inters a b c d) restituisce NIL 
(inters abcd T) restituisce NIL 
(inters a b c d NIL) restituisce (4.0 4.0) 


AutoLISP - (4) Funzioni di AutoLISP 


4,6£ itoa <int> 
Questa funzione restituisce la conversione di un intero in una stringa. Esempio: 


(itoa 33) restituisce "33" 
(itoa 17) restituisce #=7" 


1.66 _{]ambda <arcene ti> <OSET>. ce 


LAMBDA definisce una funzione “anonima” che viene utilizzata soprattutto quando i tempi spesi 
dal sistema operativo non giustificano -la definizione di una nuova funzione. LAMBDA 
restituisce il valore della sua ultima <espr> e viene usata spesso in congiunzione con APPLY e/o 
MAPCAR per eseguire una funzione su una lista. Ad esempio: 


(apply ‘(lambda (x Y 2) 
(ax (- y 2)) 


) 
da ‘(5 20 24) 
) restituisce 30 


(setg counter 0) 

(mapcar 1 (Lanbda (x) 
(setg Counter (1+ counter) ) 
(* x 5) 


) 
1(2 4 -6 20.2) 
) restituisce (20 20 -30 51.0) 


#.67 last <liista> 
Questa funzione restituisce l'ultimo elemento della <lista>. <lista> non può essere NIL. Esempi: 


(last ‘(a DE dè e)) restituisce E 
(2ast ‘(a DE (d e))) restituisce (DE) 


LAST puo restituire un atomo 0 una lista. 


4 prima vista LAST potrebbe sembrare ic maniera ideale per ottenere la coordinata Y di un 
punio. Quesio vale per 1 sumti Lidimensioncii (listo di due numeri reali), mentre nel caso di punti 
tridimensionali. LAST restituirà la componenie Z del punio. Consigliamo quindi. per evitare 
confusioni. di utilizzare per i punti bidimensionali la funzione CADR per ottenere la Y e. per i 


punti tridimensionali. CADDR per ouenere la Z. 
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4 f <li > 


Questa funzione restituisce un intero che indica il numero di elementi nella <lista>. Esempi: 


(length '(a bc dj) restituisce + 

(length ‘(a b(cd))) restituisce 3 

(length '()) restituisce bo) 
4 { < PAPA 


Questa funzione restituisce una lista i cui elementi sono i suoi argomenti. Esempi: 


(list ‘a 'b 'c) restituisce (A B C) 
(list ‘a '(bc) 'd) restituisce (A (BC) D) 
(List 3.9 6.7) restituisce (3.9 6.7) 


In AutoLISP, questa funzione e usata sovente per definire una variabile di punto bidimensionaie 
o tridimensionale ( lista di due o tre numeri reali). 


4,7 (Li <elene > 


Questa funzione restituisce T se <elermento> è una lista e NIL in caso contrario. Ad esempio: 


(listp '(a bc)) restituisce T 

(lListp. 'a) restituisce NIL 

(Lisctp 4.343) restituisce NIL 
4.7 < sile>) f<per difetto>!) 


Questa funzione carica un file di espressioni AutoLISP e ie valuta. <nome file> è una stringa 
che rappresenta il nome dei file senza estensione (°.isp" visne aggiunta automaticamente). <nome 
file> può contenere un prefisso d’elenco, come in "/funzionertesti”. Sui sistemi MS-DOS/PC- 
DOS si può digitare anche una lettera indicante l'unita disco e usare la barra rovesciata "\° (ma 
bisogna tenere presente che per ottenere una barra rovesciata in una stringa occorre digitare 


N°) 


Se non viene incluso il prefisso dell'elenco nella stringa <nome file», LOAD ispeziona il sentiero 
di libreria di AutoCAD alla ricerca del file specificato in una maniera molto simile alla funzione 
FINDFILE. Se il file viene trovato, LOAD lo carica. 


.Se l'operazione riesce, LOAD restituisce il valore dell'ultima espressione nel file, che nella 
maggior parte dei casi, corrisponderà ai nome dell'ultima funzione definita nel file. Ss 
l'operazione fallisce, si ottiene di regola un errore AutoLISP. Se però viene fornito l'argomento 
<per difetto» LOAD restituisce il valore di questo argomento al posto che produrre l'errore. 
Questo permette ad un'applicazione di AutoLISP che richiama LOAD di eseguire un'operazione 
alternativa se non viene trovato il file da caricare. Naturalmente occorre accertarsi che 
l'argomento <per difetto> sia differente dall'ultima espressione nei file, altrimenti il significato 
dei valore restituito da LOAD sarà ambiguo. 
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Supponendo ad esempio che il file "/fred/testl.lsp" contenga: 


(defun MIA-FUNZI (x) 
... funzione Corpo ... 


) 
(defun MIA-FUNZ2 (x) 
... funzione corpo ... 


e che il file "test2.lsp" non esista, allora: 


(l10ad "/ *red/testl") restituirebbe  MIA-FUNZ2 
(load "/ fred/testl" "“male") restituirebbe  MIA-FUNZ2 
(load "test2" “male") restituirebbe "male" 

(load "test2") provocherebbe un errore AutoLISP 


La funzione LOAD puo essere richiamata dall'interno di un'altra funzione LISP e perfino 
ricorsivamente (dall'interno del file da caricarsi). 


Ogni volta che inizia una sessione nell’Editore di Disegni di AutoCAD, AutoLISP carica il file 
“acad.isp", se esiste. În questo file si possono inserire definizioni di funzioni e comandi 
ricorrenti. che verranno valutati automaticamente ogni volta che si inizia ad editare un disegno. 
Se desiderate che una serie di comandi AutoCAD o di funzioni AutoLISP vengano eseguite 
automaticamente all'inizio di una sessione d'editazione, posizionate un DEFUN della funzione 
speciale "S:STARTUP" nel file “acad.isp*; se questa funzione esiste, AutoCAD la esegue 


automaticamente all'inizio della sessione d'editazione. (Rimandiamo alla descrizione di DEFUN 
per l'esempio esplicativo) pirla deli Sata 


472 (100 _< > 


Questa funzione restituisce il logaritmo naturale del <numero> sottoforma di numero reale. 
Esempi: 


(log 4.5) restituisce 1.50408 
(106 2.22) restituisce 0.298851 
4,7? (109 < TO> < 70? 


Questa funzione restituisce il risultato di un AND logico di una lista di <numeri>. I numeri 
devono essere interi. Il risultato sarà un intero. Esempi: 


(lLogand 7 15 3) restituisce 3 

(loganà 2 3 25) restituisce >. 

(loganà 8 3 4) restituisce 0 
474 (lozior < >_< P0>. 


Questa funzione restituisce il risultato di un OR comprensivo logico di una lista di <numeri>. ] 
numeri devono essere interi. Il risultato sarà un intero. Esempi 


(locior 2 2 4) restituisce 7 
(2ogior 9 3) restituisce pai 
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438! < >_< it> 


Questa funzione restituisce lo spostamento logico di <numi> per il numero di bit definito da 
<num bi. <numl> e <num bit> devono essere interi. Il risultato sara un intero. 


Se <num bit> è positivo, <numl> viene spostato verso sinsitra: se è Negativo, verso destra. In 
entrambi i casi "zero" bit vengono spostati verso l'interno e i bit spostati all'esterno sono 
eliminati. Se un bit “1° è spostato dentro o fuori dal primo bit (il I6esimo su computer sorto 
DOS, il 52esimo su stazioni di lavoro a 32-bit), il suo segno cambia. 


(l1sh 2 1) restituisce 4 

(l1sh 2 -1) restituisce 1 

(2sh 40 2) restituisce 160 

(l1sh 16384 1) restiruisce "32768 su computer sotto DOS 
(l1sh 12384 1) restituisce 32768 su stazioni di lavoro a 32-bit 


‘mapca 





MAPCAR restituisce il risultato dell'esecuzione della <iunzione> con gli elementi singoli di 
<listal> avanzando lungo la <listan> che sono fornite come argomenti di <funzione>. Il numero 
di liste deve corrispondere al numero di argomenti richiesti dalla <runzione>. Ad esempio: 


(setq a 10 b 20 c 30) i 
(mapcar 'l+ '(10 20.20)) | restituisce (11 21 31) 


Che è equivalente a: 
(2+ a) 
(1+ h) 
(1+ c) 
solo che MAPCAR restituisce una lista dei risultati. In modo analogo: 
(mapcar '- "(10 20 30) '(4 3 2)) restituisce (14 23 32) 
Che è aquivaiente a: 
(+ 10 4) 
(+ 20 3) 
(+ 30 2) 
La funzione LAMBDA può specificare una funzione “anonima” che viene eseguita da MAPCAR. 
Ciò è utile quando alcuni degli argomenti della funzione sono costanti o sono forniti in altro 


modo. Esempio: 


(2apcar '(lambda (x) (+ x 3)) '(20 20 30)) restituisce (13 23 33) 
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(mapcar '(2lambda (x Y z) 
(tx (- y 2)) 


) 
‘(5 6) '(20 30) '(24 5.0) 
) restituisce (30 150.0) 


4.77 (max <Nnumero> <numero>. e 


Questa funzione restituisce il maggiore dei <numeri> dati. Ogni <numero> può essere un numero 
reale o intero. Esempi: 


(max 4.07 —144) restituisce 4.07 
{max -88 19 5 2) restituisce 19 


498 ‘member <espr> <ì ista>) 


Questa iunzione ricerca la <lista> e se incontra una <espr> restituisce il resto della <lista> 
iniziando con la prima <espr>. Se non vi sono <espr> nella <lista>, MEMBER restituisce NIL. 
Esempi: 


(member ' 


ec cd e)) restituisce (C D E) 
{member 'Qq cde)) 


restituisce NIL 


4,79 ‘menvemò <Str inga>) 


La funzione MENUCMD permette ai programmi LISP di cambiare da un sottomentù all'altro di 
un menù AutoCAD. Così un programma LISP e in grado di operare con un file di menù 
associato. visualizzando un sottomenù appropriato di altenative ogni volta che vengono richiesti 
dati dall'utente. MENUCMD restituisce sempre NIL. L'argomento <stringa> di MENUCMD si 
presenta di questo tipo: 


sezione=sotromenù 
in cui: 

sezione Specifica la sezione del menù. I nomi permessi sono: 
S per il menù SCREEN (di schermo) 
BR per il menù BUTTONS (dei pulsanti) 
1 per il menù ICON 
PI - PIO peri menua rotolo (POP) da 1 a 10 
Tì - T4 peri menù TABLET da l a 4 (di tavoletta) 
AI per il menu AUXI (della tastiera ausiliaria) 

sottomeni specifica quale sottomenu deve essere attivato. Il nome deve essere uno 


dei titoli di sottomenu (senza gli asterischi *9°") che si trova nel file di 
menù richiamato in memoria in quel momento, oppure il nome di una 
sezione, come definito sopra. 
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Rimandiamo all'Appendice B della Guida all'Uso di AutoCAD per ulteriori informazioni. 
Occorre notare che il prefisso "S°, che viene usato per individuare i sottomenu in un file di 
menù, non appare qui. Per esempio: 


(menucmd "S=OSNAP") 


richiamerebbe il sottomenu di "OSNAP" sullo schermo (a condizione che questo sottomenù esista 
nei file di menù corrente). In modo analogo: 


(menucmd "B="MIO-PULSANTI") 
assegnerebbe il sottomenu "MIO-PULSANTT ai menù dei pulsanti. 


Per i menù ad icone e 2 rotolo, "*° è un nome valido per un sottomenù e produce la 
visualizzazione del sottomenu corrispondente alla sezione di menù specificata. Ad esempio, 
questa sequenza: 


(menucnd "P1l=NUMERIC") 
zenucmd "Pl=*") 


farà corrispondere al menù a rotolo 1, il sotromenu “NUMERICO” e lo farà apparire sullo 
schermo. 


4 (min< > <numero>... 


Questa funzione restituisce il più piccolo dei <numeri>.-Ogni- <numero> può essere reale o 
intero. Esempi: 


Lal a 


(min 683 -10.0) restituisce 10.0 
(min 73 2 48 5) restituisce 2 


£8T1 ‘minmuso <elemento>) 


Questa funzione restituisce T se <elemento> è un numero reale o intero. in caso contrario 
restituisce NIL. Questa funzione non è definita per altri tipi di <elemento>. Esempi: 


(minusp -1) restituisce To di 
(minusp -4.293) restituisce T 
zinusp 830.2) restituisce NIL 

d. fngct_ <e e > 


Questa funzione restituisce T se l'espressione dà NIL e NIL in caso contrario. Di solito la 
funzione NULL è usata per liste e la funzione NOT per altri tipi di dati in congiunzione con 
alcune funzioni di controllo. Determinando per esempio quanto segue: 


(setq a 123) 


(sete b "stringa") 
(setg c NIL) 
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allora: 
{not a) restituisce NIL 
(not b) restituisce NIL 
(not c) restituisce n 
(not '()) restituisce T 
4,82%?_L <n> <lista> 


Questa funzione restituisce l'ennesimo elemento di una <lista>, in cui <n> è il numero 
dell'elemento da restituire (zero è il primo elemento). Se <n> € maggiore del numero di elementi 
nella <lista>, viene restituito NIL. Esempi: 


(ntàh 3 ‘(a DE d e)) restituisce D 
(nth 0 '‘(abe d e)) restituisce A 
(nti 5 ‘(a DE à e)) restituisce NIL 


Li finuìl? <elemento> 


Questa funzione restituisce T quando l'elemento è legato a NIL e NIL in caso contrario. 
Determinando per esempio quanto segue: 


(setg a 123) 
‘(setq b uscringa") 
(setg c NIL) 


aliora: 
(nulì a) restituisce NIL 
(null b) restituisce NIL 
(nulì c) restituisce 3 
null '()) restituisce È 
4,83 *D_ <elem “O> 


Questa funzione restituisce T se l'<elemento> è un numero reale o intero e NIL in caso 
contrario. Determinando per esempio quanto segue: 


(setg a 123) 
(setg Db 'a) 


allora: 

(numberp 4) restituisce T 
(numberp 3,8348) restituisce 
{(numberzD "salve") restituisce L 
(numberp '2) restituisce NIL 
{numberp 2) restituisce al 
(numberp Db) restituisce NIL 
(numberp (eval D)) restituisce n 
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4, ‘on < file> < > 


Questa funzione apre un file di accesso per le funzioni I/O di AutoLISP. Essa restituisce un 
descrittore di file che deve essere usato da altre funzioni I/O; per questa ragione le deve essere 
assegnata una variabile tramite SETQ. Esempio: 


(setq a (open "file.estans‘ "r4)) 


Il <nome file> è una stringa di testo che specifica il nome e l'estensione dei file da aprire. 
<modo> è l'identificatore "read/write" e deve essere una stringa contenente una sola lettera in 
minuscolo. Riportiamo qui sotto le diverse lettere che f ungono da identificatore. 


Modo di OPEN Descrizione 


File aperto per La lettura, se «nome file» non esiste, la funzione restituisce 
MIL. 


File aperto per ia scrittura. Se <name file» non esiste, un nuovo file viene 
cresto e aperto. Se invece <nome file» già esiste, i nuovi dati inseriti vengono 
savrancosti a quelli che vi sono contenuti. 


File aperto per l'aggiunta di uiteriori dati. Se <nome file» non esiste, L2 nuovo 
file viene creato e aperto. Se invece <nome file> già esiste, il file viene 
aperto nei punto dove terminano i dati, in modo che ogni nuevo dato venga seritto 
nei file, verrà aggiunto ai dati già esistenti. 


Nei sistemi 005, alcuni programmi ed editori di testi scrivono i files conun 
contrassegno alla fine dei testo (CTRL Z, codice ASCII 26 decimete) che indica << 
che il file è terminato. Quando legge un file ai testa, DOS considera il tile 
terminato ogni volta che incontra uno di questi contrassegni, indipendentemente 

dal fatto se dopo di questo si trovano ancora dei dati. Se si intende usare il 

mado “a” del comando OPEN per aggiungere dati a file prodotti da un'altra 

programma, bisognerebbe accertarsi che il muovo orcgramma non inserisca 
automaticamente contrassegni dei tino CTRL 2 alla fine dei file di testo, 





Supponendo che negli esempi che seguono non esistano i nomi dei file: 





(setq £ (open "nuovo.tst" #")) restituisce <File =nnn> 
(setq £ (open "nessun. fil" "r4#)) restituisce NIL 3 
(setq £ (open "logfile” "a")) restituisce <File annm 


<nome rile> può contenere un prefisso d'elenco, come in "/testyfunzi”. Sui sistemi MS-DOS/PC- 
DOS si può digitare anche una lettera indicante l’unità disco e usare la barra rovesciata "\" (ma 
bisogna tenere presente che per ottenere una barra rovesciata in una stringa occorre digitare 


n. 
Esempi: 


(setq £ (open "/x/nuovo.tst" "w")) restituisce <File snnnn> 
(setq £ (open "nessun.fil" "r")) restituisce  NIL 
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allo stesso modo come apparirebbe sullo schermo. Viene scritta solo l’espressione specificata: non 
vengono inciusi spazi o nuove righe. Determinando per esempio quanto segue: 


(setg a 123) 
(setg b '(a)) 


ne risulta che: 


(prinl 'a) visualizza À - e restituisce A 
(prinl a) visualizza 123 e restituisce 123 
(prinl Db) visualizza (A) e restituisce (A) 
(prinl "Ciao") visualizza "Ciao" e restituisce "Ciao" 


Ognuno di questi esempi visualizza sullo schermo, dato che non è srato specificato un <desc 
file». Supponendo che F sia un descrittore di file valido per un file aperto alla scrittura: 


(prinl "Ciao" £) 
scriverebbe "Ciao" nel file specificato e restituirebbe "Ciao". 


Se <espr> è una stringa contenente caratteri di controllo, PRINI li visualizza preceduti da una 
barra rovesciata, come segue: 


\e per "escape" 
\n per "newiine" 
\r per "return" 
\t per "tab" 
\nnn per il carattere il cui codice ottale è nnn 
Quindi: 
(prinl (che 2)) visualizza "\002" e restituisce  "\002" 
(prinl (cher 10)) visualizza. "van" e restituisce "\n" 


PRINI può essere utilizzato senza argomenti e restituira te visualizzera) un simbolo il cui nome 
corrisponde alla stringa nulla. Se utilizzate PRINI (senza argomenti) come uitima espressione in 
Una funzione utente. quando ‘a funzione sara compieta otterrete solo la visualizzazione di una 
linea vuota, ciò che vi permetterà di uscire da una funzione senza procurare incidenti. Facciamo 
un'esempio: 
(defun C:IMPOST () 

(setvar "LUNITS" 4) 

(setvar "PUNTINI" 0} 

(prinl) 


allora: 


Comando: [MPOST 


Questa sequenza eseguirà il comando definito dall'utente. eseguirà le funzioni SETVAR richieste 
* ripresenterà il messaggio di richiesta comandi senza visualizzare alcun messaggio estraneo. 
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4,92 i < >_< *ile>1l 
Questa funzione è identica 2 PRINI. solo che i caratteri di controllo in <espr> sono scritti senza 


espansioni. In generale, PRINI è destinato a scrivere espressioni in modo che siano compatibili 
con LOAD, mentre PRINC le scrive in modo che siano leggibili da funzioni quali READ-LINE. 


4,93 _< >_I<d *ile> 
Questa funzione è equivalente a PRINI, solo che prima della <espr> viene introdotta una nuova 
riga e dopo <espr> viene introdotto uno spazio. 
4.94 (e) <e >. 


Questa funzione valuta ogni <espr> in modo sequenziale e restituisce il valore dell'ultima 
espressione. Ad esempio: 


(if (= a Db) (progn 
(sezg a (+ a 10)) 
= (seg b (- Db 10)) 


) 


Normalmente la funzione IF valuta un'espressione “then” se l’espressione "test" dà un valore 
qualsiasi eccetto NIL. In questo esempio, invece, abbiamo usato PROGN per far valutare due 
espressioni. Ponta 
4,98 romet s> 
Questa funzione visualizza un messaggio sull'area riservata ai messaggi di richiesta dello schermo 
e restituisce NIL. <mess> è una stringa di testo. Su configurazioni AutoCAD a due schermi. 
PROMPT visualizza <mess> su entrambi gli schermi e per questa ragione e preferibile a PRINC. 
Ad esempio: 

(prompt “Nuovo valore: ") 


visualizza "Nuovo valore: " sullo schermo e restituisce NIL. 


4 [A te <espr> 


Questa funzione non valuta I'<espr> e la restituisce letteralmente. Può essere scritta nel modo 
seguente: 


‘espr 
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Esempi: 
(quote a) restituisce AÀ 
(quote cat) restituisce CAT 
(quota (a b)) restituisce (A_B) 
‘a restituisce A 
‘cat restituisce CAT 
‘(a b) restituisce (A_B) 


(Gli uitimi tre esempi non funzionano se sono digitati direttamente dalla tastiera in risposta a un 
messaggio di AutoCAD. Si tenga presente che un'immissione di questo tipo deve iniziare con "(" 
o "!" per poter essere riconosciuta da un'espressione LISP.) 


497T__! <strinca> 


Questa funzione restituisce la prima lista (o atomo) ottenuta da <stringa>. <stringa> non deve 
contenere spazi vuoti. Esempi: 


(read "Ciao") restituisce CIAO 
(read "(a)") restituisce (A) 
4 Z ech {<desc £ile>) 


Questa funzione legge un singolo carattere dal buffer di input della tastiera o dal file aperto 
descritto da «desc file»; restituisce un’ numero intero che corrisponde al codice ASCII 
rappresentante il carattere letto. 


Se non è stato specificato un <desc file> e non ci sono caratteri nel buffer di input della 
tastiera, READ-CHAR si aspetta che si digiti qualcosa suila tastiera (seguito da RETURN). 
Supponendo che il buffer di input deila tastiera sia vuoto: 


(read-char) 


aspetterà che si immetta qualcesa. Se si digita "ABC® seguito ca RETURN. per esempio, READ- 
CHAR restituisce 65, cioé il codice ASCII che sta per “A°. I richiami di READ-CHAR 
successivi restituiscono rispettivamente 66, 67 e 10 (a capo? Se si richiama ancora una volta 
READ-CHAR, la funzione aspetta un nuovo input dell'utente. 


I sistemi operativi sotto ai quali funzionano AutoCAD e AutoLISP utilizzano convenzioni 
differenti per segnalare la fine di una linea in un file di testo ASCII. UNIX. ad esempio. 
utilizza un carattere solo per indicare una nuova linea (LF, codice ASCII 10), mentre PC- 
DOS/MS-DOS utilizza una coppia di caratteri (CR/LF, codici ASCII 13 e 10). Per facilitare la 
redazione di programmi AutoLISP trasferibili tra diversi sistami operativi gestiti da AutoCAD. 
READ-CHAR accetta tutte le convenzioni e restituisce un carattere solo di nuova linea (codice 
ASCII 10) ogni volta che incontra un carattere (o una sequenza di caratteri) indicante una fine 
di linea. 
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4,9 z cli < £ >I 
Questa funzione legge una stringa immessa dalla tastiera o dal file aperto descritto da <desc 
file». Se viene incontrata la fine del file, READ-LINE restituisce NIL, in caso contrario 
restituisce la stringa che è stata letta. Supponendo che F sia un descrittore di file valido: 


{read-line f) 


restituirebbe la riga di input successiva del file oppure NIL, se è stata raggiunta la fine del file. 


4100 ‘redraw f<nome entità> '<modo>)) 


L'effetto della funzione dipende dal numero di argomenti fornito. Se viene richiamata senza 
argomenti: 


(redraw) 


ridisegna la finestra corrente come lo farebbe il comando RIDIS (REDRAW) di AutoCAD. Se 
richiamata con un argomento <nome entuta>: 


(redraw <nome entità>) 
l'entità selezionata verrà ridisegnata. Ciò è utile per identificare un'entità dopo aver usato 
GRCLEAR per ripulire lo schermo. I nomi delle entità sono descritti nel Capitolo 5 di questo 
manuale. 


Un controllo totale della funzicne che ridisegna un'entità è data richiamando REDRAW con due 
argomenti: 


(redraw <nome entità> <modo>) 


<nome entità> è il nome dell'entità cae deve essere ridisegnata e <modo> è un intero con uno 
sei valori seguenti: 






| Modo RIDIS | 


1 | Ridisegna entità sullo schermo 


3 1 Evioenzia entità 










Se <nome entità> è l'intestazione di un'entità complessa (polilinea o blocco complesso), l'entità 
principale e tutte le entità secondarie saranno elaborate se il <modo> è positivo. Se l'argomento 
<modo> è negativo, solo l'entità d’intestazione verrà elaborata da REDRAW. 


REDRAW restituisce sempre NIL. 
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4 (x < > < > 


Questa funzione divide <numi> per <num2> e restituisce il (<numl> mod <num2>) restante. 
REM può essere usata con numeri interi o reali e valgono le regole standard di conversione. 


Esempi: 


(rem 42 12) restituisce 6 
(rem 12.0 16) restituisce 12.0 
(rem 60 3) restituisce 0 

4 (© < >_< PIET 


In questa funzione <numero> rappresenta un numero intero e positivo qualsiasi. La funzione 
valuta l'<espr> un dato <numero> di volte e restituisce il valore dell'ultima espressione. 
Determinando per esempio quanto segue: 


(setq a 10) 
(setq b 100) 
allora: 
(repeat 4 
(setq a (= a 10))) 
(setq b (+ b 10))) 
) restituisce 140 
4 (zev < 2) 


Questa funzione restituisce <lista> invertendo l'ordine dei suoi elementi. Ad esempio: 


(reverse '((a) D c)) restituisce (C 3 (A)) 


4,104 __< < erc> f< > f<n isione>): 


Questa funzione restituisce una stringa che è la rappresentazione di <numero> (reale) secondo 
l'impostazione del <modo>. della <precisione> e della variabile ci quotatura DIMZP di 
AutoCAD. Gli argomenti <modo> e <precisione> sono interi che selezionano ia precisione e il 
modo delle unità lineari. I valori di <modo> sono: 


Modo RTOS | Formato 


| Scientifico 


| Decimate 
| Ingegnerile (piedi + poilici cecimmii) 


| Architetturale (piedi - collici frazioneri) 





| Frazionario 
Gli argomenti <modo> e <precisione> corrispondono alle variabili di sistema di AutoCAD 


LUNITS e LUPREC. Se si omettono gli argomenti. verranno usate le impostazioni correnti di 
LUNITS e LUPREC. 
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Ad esempio, se DIMZP = 0: 


(rtos 17.5 1 4) restituisce #21.,7500E+01" 

(rtos 17.5 2 2) restituisce #WI7,50" 

(rtos 17.5 3 2) restituisce #)!-5,50"" 

(rtos 17.5 4 2) restituisce #}1-5 1/2"" 

(rtos 17.5 5 2) restituisce n17 1/2" 
4.10£ set _<simb> <esDr> 


Questa funzione assegna alia <espr> il valore di <simb> (che è il nome di un simbolo citato) € 
restituisce quel valore. Esempi: 


(seta 'a 5.0) restituisce 5,0 e definisce il simbolo A 
(set (quote b) 'a) restituisce À e definisce il simbolo B 


Se la funzione SET è usata con un nome di simbolo non citato, può assegnare un nuovo valore 2 


un altro simbolo indiresramente. Considerando gli esempi precedenti: 
(set b 640) restituirebbe 640 


e assegnerebbe il valore 640 al simbolo A (dato che il simbolo B lo contiene). Rinviamo a SETQ. 


i to _<si >_< vi> (<sì > <esor2> 


Questa funzione assegna alla <esprl> il valore di <simb]>. alla <espr2> il valore di <simb2> € 
così via; è la funzione di assegnamento principale in AutoLISP e resituisce l’ultima <espr>. Per 
esempio: 


(setq a 5.0) restituisce 5.0 


da al simbolo A il vaiore 5.0. Ogni volta che A viene valutato. restituirà il numero reaie 
+ 0. Altri esempi: 


uo 


(setq b 123 c 4.7) restituisce 4.7 
(seta s "ciò") restituisce “ciò” 
(seta x '(a D)) restituisce (A 3) 


Le funzioni SET e SETQ creano 0 modificano Simboli globali. a meno che non vengano usa? 
all'interno di una funzione DEFUN per assegnare un valore all'argomento di una funzione 0 ai 
un simbolo definito come locale a quella funzione (DEFUN). Ad esempio: 


(seta glol 123) (Crea un simbolo globale) 
(defun demo (argì arg2 /i0cì 1002) 
(seta argi 234) (attribuisce un nuovo valore locale) 
(set loc1 345) (attribuisce un nuovo valore locaie | 
(setg glol 456) (attribuisce un nuovo valore globale) 
(setg gì202 567) (crea un nuovo simbolo globale) 

) 
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Simboli giobali possono essere selezionati o modificati da ogni funzione o usati all'interno di 
ogni espressione. Simboli locali e argomenti di funzioni sono significativi solo durante ia 
valutazione di una funzione che li definisce (e durante funzioni richiamate da questa). 
argomenti di funzioni possono essere impiegati in qualità di simboli locali; la funzione può 
modificare i loro valori, ma tali trasformazioni vengono eliminate appena si esce dalla funzione. 


SET e SETQ sono in grado di attribuire nuovi valori a simboli incorporati e nomi di funzioni, 
annullando le attribuzioni precedenti o rendendole inaccessibili. Molti utenti hanno commesso 
l'inaccortezza di impostare dati di questo tipo: 


(setq angolo (...)) ERROR! 
(setq lunghezza (...)) ERROR! 
(setq max (...)) SERRORI! 
(setq t(...)) CERROR!! 
(setq pi 3.0) SERRORI!! 


Per evitare ogni tipo di errore imprevisto, occorre fare molta attenzione nella scelta dei nomi da 
dare ai propri simboli. Non bisogna mai usare per un proprio simbolo lo stesso nome di un 
simbolo già incorporaso in una junzione! (Per ottenere una lista dei nomi di simboli da evitare. 
basta digitare ""ATOMLIST® al messaggio "Comando" di AutoCAD prima di caricare qualunque 
funzione di AutoLISP). 


4,107__‘setv < e_var> <va >) 


Questa funzione assegna un <valore> a una variabile di sistema di AutoCAD e restituisce questo 
valore. Il nome della variabile deve essere scritto fra virgolette. Ad esempio: 


(setvar "FILLETRAD" 0.50) restituisce 0,5000000 <> 


cioé specifica un raggio di raccordo in AutoCAD di 0.5 unità. Per le variabili di sistema con 
valori interi, il <valore> fornito deve essere tra -352768 e +32767. 


Alcuni comandi di AutoCAD assumono i valori delle variabili di sistema prima di visualizzare i 
messaggi di richiesta dati. Se utilizzare MODIVAR per impostare un nuovo valore mentre un 
comando è attivo, il nuovo valore non sara effettivo prima del prossimo comando AutoCAD. 


Rimandiamo all'Appendice A della Guida all'Uso per la lista delle variabili correnti di 
AutoCAD. Vedi anche la funzione GETVAR. ; PS 


4.108 ‘sin <ancolo>ì 


Questa funzione restituisce il seno di <angolo> sottoforma di numero reaie. L'angolo è espresso 
in radianti. Esempi: 


(sin 1.0) restituisce: 0.841471 
(sin 0.0) restituisce 0.000000 
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Questa funzione restituisce la radice quadrata del <numero> sottoforma di numero reale. Esempi: 






(sqrt 4) restituisce 2.000000 

(sqrt 2.0) restituisce 1.414214 ; 

I] 

4110 (strsase <stringa> '<espr>! i 
. ape . . . . . . è U 
STRCASE valuta la stringa specificata da <stringa> e restituisce una copia di <stringa> con tutti 
i caratteri alfabetici convertiti in maiuscole 0 minuscole a seconda dell'argomento <espr>. Se 
<espr> non è presente 0 è NIL, tutti i caratteri alfabetici nella <stringa> saranno convertiti in 


maiuscole; se invece <espr> è presente € diverso da NIL, tutti i caratteri alfabetici nella 
<stringa> saranno convertiti in minuscole. Ad esempio: 


(strcase "Modello") restituisce "MODELLO" 
(strcase "Modello" T) restituisce "modello" 


A1lL_ (s@$0e20t <strincal> <strinqa2>...) 


Questa funzione restituisce una stringa che è la concatenazione di <stringal>, <stringa?>. ecc. 
Esempi: 


(strcat "circo" “scritto") restituisce "circoscritto" 
(strcat "a" "D" "c") restituisce "abc" 
(strcat "a" "" "c") restituisce "ac" 

4112 (SG5zì <strinca> 


» 
Questa funzione restituisce la lunghezza, in caratteri, di una stringa sottoforma di numero 
intero. Esempi 


(strlen "abcd") restituisce 4 
(strlen "ab") restituisce 2 
(strlen "") restituisce 0 
DE 
AJl1%°_ ( NUOV iem> < rec> <lista> 


Questa funzione cerca l'elemento <elem prec> nella <lista> € restituisce una copia di <lista> con 
tutti gli <elem prec> sostituiti da <nuovo elem>. Se <elem prec> non è reperibile nella lista, 


SUBST restituisce la <lista> invariata. Avendo definito per esempio: 


(sete modello '(a D (c d) D) 
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allora: 
(subst 'qq 'b modello) restituisce (A QQ (C D) QQ) 
(subst 'qq 'z modello) restituisce (A B (C D) B) 
(subst 'qq '(c d) modello) restituisce (A BQQ B) 
(subst '(qq rr) '(c d) modello) restituisce (A B (QQ RR) 3) 
(subst '(qq rr) 'z modello) restituisce (A _B (C D) B) 


Se usato con ASSOC, SUBST permette di sostituire il valore associato a una chiave in una lista 
di associazioni. Determinando per esempio quanto segue: 


(setq chi '((nome grata) (cognome carbo) (detta la _divina))) 


allora: 
(setq prec 
(assoc 'nome chi) 
) restituisce (NOME GRETA) 
(setg nuovo '(nome g)) restituisce {NOME G) 


(subst nuovo prec chi restituisce {(NOME G) (COGNOME GARBO) 
(DETTA LA _DIVINA)) 


4.114 —(substr <stringa> <i “0> f<lune>) 


Questa funzione restituisce una sottostringa di <stringa> che inizia neila posizione del carattere 
<inizio> della <stringa> e continua per la lunghezza <iung> di caratteri. Se <iung> non e 


specificata, la sottostringa continua fino alla fine della stringa. <inizio> (e <lung>, se presente? 
deve essere un numero intero positivo, Il primo carattere della <stringa> è il carattere numero |. 
Esempi: 


(substr “"abcde" 2) restituisce "bcde" 
(subste "abcede” 2 1) restituisce La 
(substr "abcede" 3 2) restituisce “ed” 


3.115 (terpri) 
Questa funzione visualizza un passaggio a nuova linea suilo schermo e restituisce NIL. TERPRI 


non viene usato per file I/O. Per scrivere un “a capo” in un file. bisogna ricorrere a PRINT ; 
PRINC. 


4,116 (tCexmscori 
La funzione TEXTSCR cambia dallo schermo grafico allo schermo testo sui sistemi 


monoschermo (come il tasto di commutazione "FLIP SCREEN" di AutoCAD). TEXTSCR 
restituisce sempre NIL. Vedi anche la funzione GRAPHSCR. 
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4.110 <£ i > 


Questa funzione è un aiuto di messa a punto: segnala le <funzioni> specificate con un 
identificatore nel percorso del programma € restituisce il nome dell'ultima funzione. Ogni volta 
sne viene valutata la <funzione>, viene visualizzato il percorso del programma con l'immissione 
della funzione (rientrata ai suo livello di profondità) e il risultato della funzione verra scritto 
sullo schermo. Ad esempio: 


(trace mia-funz) restituisce MIA-FUNZ 


» posiziona l’identificatore di percorso per la funzione MIA-FUNZ. Vedi anche UNTRACE. 


L112 (trans <DU> <da> <a> t<spostamento>1) 


Questa funzione trasferisce un punto (o uno spostamento) da un sistema di coordinate all'altro. 
L'argomento <pt> e COMposio da un lista di 3 numeri reali o da un vettore di spostamento a 3 
simensioni, <da> è un codice indicante il sistema di coordinate nel quale <pt> e espresso e <a> e 
: codice indicante il sistema di coordinate del punto da restituire. L'argomento opzionale 
<spostamento>, se presente € diverso da 0. specifica che <pt> deve essere considerato come un 
vettore di spostamento 3D e non come un punto. Gli argomenti <da> e <a> possono essere del 


tipo seguente: 


@ Uno dei codici interi della tabella seguente. 


Sistema di coordinate 


| Sistema ci Coordinate Globali (VCS) 


ù | Sistema Gi Coordinate corrente (VCS) 


‘ Sistema gi Coordinare di visualizzazione cella 
SSA SE 
| finestra corrente « vedi in Dasso 





« Un nome di entita del tipo restituito dalla funzioni ENTNEXT, ENTLAST. ENTSEL e 
SSNAME descritte nel Capitolo 5. Questo permette di trasferire un punto da 0 a un 
Sistema di Coordinate d'Entta (ECS) di un'entità specifica. (Per zicune entità. ECS 
equivale al WCS, per cui la conversione tra ESC e WCS sara per queste entità 
un'operazione nulla). 


« Un vettore di estrusione 3D (una lista di 3 numeri reali). Questo è sn altro metodo per 
convertire da 0 a un ESC. Questo sistema non funziona però se I'ECS è equivalente al 
WCS. 


TRANS restituisce un punto tridimensionale (o uno spostamento) nel sistema di coordinate 
specificato dall'argomento <a>. Ad esempio, daro un UCS ruotato di 90 gradi in senso antiorario 
intorno all'asse Z del WCS: 


(trans ‘(21.0 2.0 3.0) 
trans '/1.0 2.0 3.0) 


+ o 


1) restituirebbe (2.0 1.0 3.0) 
0) restituirebbe  (-2.0 2.0 3.0) 
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Segue una descrizione dei sistemi di coordinate gestiti da TRANS e del modo in cui questi 
vengono gestiti. 


WCS Questo è il sistema di coordinate di referenza. Tutti gli altri sistemi di coordinate 
vengono definiti relativamente a esso. Il WCS è l'unico sistema di coordinate non 
modificabile. La sua funzione principale è quella di definire coordinate fisse, che 
non cambiano al passaggio ad un altro sistema di coordinate. 


UCS Questo sistema di coordinate viene definito dall'utente per facilitare (o, in certi ’ 
casi, rendere possibili) aicune operazioni di editazione. Tutte le immissioni di 
punti (compresi i punti restituiti da un'espressione di AutoLISP ma esclusi i punti 
preceduti da un "*") sono interpretati relativamente ail'UCS corrente. Se volete 
quindi fornire valori in WCS, ECS o DCS in risposta 1 comandi di AutoCAD, 
dovete prima convertirli nei valori corrispondenti neil'UCS corrente tramite 
TRANS. 


ECS Valori di punto restituiti da ENTGET (Capitolo 5) sono misurati relativamente 1 
questo sistema di coordinate. Tali punti sono di poca ut:iità finché non vengono 
convertiti nei sistema di coordinate appropriato all'uso cas se ne vuole fare. 


Ad esempio, se desiderate disegnare una linea dal puato di inserimento di un 
testo (senza utilizzare OSNAP) dovreste convertire il punto d'inserimento dell 
entità di testo dal suo ECS all'UCS: 


(trans '(1 2 3) l <nome entità di testo) 1) 
e immettere il risultato in risposta al messaggio "DAI punto:" 


DCS Il sistema di coordinate di visualizzazione (Display Coordinare System) è il 
sistema di coordinare nel quale le immagini vengono trasformare prima di essere 
visualizzate. La sua origine è il punto di mira (riportato dalla variabile di sistema 
TARGET) e il suo asse Z e la direzione di vista. Nel DCS ci si trova sempre in 
vista piana (l'Y punta verso l'alto e l'X è rivolto verso destra). E° utilizzato per 
determinare come una costruzione appare a chi guarda is schermo. 





Ad esempio. se avete immesso un punto e desiderate ini iduare 2 quale estremo 
di linea il punto cspare più vicino. vi conviene convertire Questo punio dall'UCS 
al DCS. ; 





(trans <punto> l 2) 
| e ogni estremo di linea dall’ECS della linea al DCS. 
(trans <estremo> <nome linea> 2) 


{ Potete calcolare la distanza tra il punto e ogni estremo della linea (ignorando la 
componente Z) per determinare quale estremo sembra cp: vicino. 


TRANS può trasformare anche punti 2D, inventando un valore 2z9ropriato per la Z. La 


[| componente Z utilizzata dipende dal sistema di coordinate di partenza specificato e se il valore 
deve essere convertito in un punto 0 in uno spostamento. La Z viene inventata nella maniera 
seguente: 


7 


[°° CRONO 


AutoLISP - (4) Funzioni di AutoLISP 





proiettato sui Diano di costruzione corrente 


pes | (piano XY del l'UCS + elevazione corrente) 


Questa funzione restituisce il tipo di <elemento»>. in cui TYPE è uno dei seguenti: 


REAL numeri a virgola mobile 
FILE descrittori di file 

STR stringa di caratteri 

INT numeri interi 

SYM simboli 

LIST liste (e funzioni utente) 
SUBR funzioni interne di AutoL1SP 
PICKSET gruppi di selezione AutoCAD 
ENAME nomi di entità AutoCAD 


PAGETB tabella di paginazione di funzioni 
Per esempio, determinando quanto segue: 


. (sezg a 123 r 3.45 S "ciao" x '(a Db C)) 
n (secs £ (open "nome" say) 


ne risulta che: 


(type 'a) restituisce SYM 
(type a) restituisce INT 
(tyse 7 restituisce FILE 
(type Tr) restituisce REAL 
type Ss) restituisce STR 
(type x) restituisce LIST 
(type +) restituisce SUBR 


L'esempio seguente illustra un'applicazione della funzione TYPE. 


(defun intero (a) 


(se (= (type a) INT) itype è un intero? 
T ;ssì, restituisce T 
NIL ino, restituisce NIL 
) 
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4.12 ld race < i Se di 


Questa funzione rimuove l'identificatore di percorso per le <funzioni> specificate e restituisce il 
pome dell'ultima funzione. Essa disattiva selettivamente l'aiuto di messa a punto del percorso dei 
programma. Per esempio: 


x 


(untrace mia-funz) restituisce MIA-FUNZ 


e cancella l'identificatore di percorso per MIA-FUNZ. Vedi anche TRACE. 


4.12 v 


Questa funzione restituisce una stringa che contiene il numero corrente della versione di 
AutoLISP e dovrebbe essere usata assieme 2 EQUAL per verificare la compatibilità dei 
programmi. La stringa si presenta di questo tipo: 


"AutoLISP versione X.X" 
in cui X.X è il numero della versione. Esempio: 

(ver) potrebbe restituire "AuteLISP versione 10.0" 
In AutoLISP Esteso, VER restituisce una stringa della forma seguente: 

“"AutoLIS? Esteso Release X.X" 
se lavorate con un'applicazione, potrete quindi sapere se vi state servendo dell'AutoLISP normale 
o di quello esteso consultando la stringa restituita da VER. 
4.122 voorts 
Questa funzione restituisce una lista dei descrittori celle finestre attive ai momento. Ua 
dascrittore di finestre è una lista consistente dei numero ci identificazione della finestra e deile 
nosizioni degli angoli in basso a sinistra € in alto a destra della finestra. Questi angoli sono 
espressi in valori da 0.0 a 1.0 con (0.0 0.0) rappresentante l'angolo in basso a sinistra dell'area 
grafica del monitor e (1.0 1.0) l'angolo in alto a destra. 
Ad esempio. data una configurazione a finestra unica, la funzione VPORTS restituirà: 


((1 (0.0 0.0) (1.0 1.0) 


Parimenti, date quattro finestre di dimensioni uguali collocate ai quatiro angoli dello schermo. 
VPORTS restituira: 


( (5 (0.5 0.0) (1.0 
(2 (0.5 0.5) (1.0 
(3 (0.0 0.5) (0.5 
(4 (0.0 0.0) (0.5 


otro 

PUR 

uoouwu 
nin 


) ) 


Il descrittore della finestra corrente è sempre il primo della lista. Nell'esempio precedente. la 
finestra numero 5 è la finestra corrente. 
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4,123 whi <esT > <estr.>.. 


WHILE valuta <espr tes e se questa è diversa da NIL, valuta le altre espressioni e rivaluta 
ancora una volta <espr test. Questo procedimento continua finché <espr test> è NIL. A questo 
punto WHILE restituisce il valore più recente dell'ultima espressione. Dato ad esempio: 


(setq a 1) 
ne risulta che: 
(while (<= 10) 
(funz-utente a) 


(seta a (1+ a) 
) 


richiamerebbe dieci volte la funzione utente FUNZ-UTENTE assegnando ad A i valori da 1 2 
10. In seguito restituirebbe 11. che è il vaiore dell'ultima espressione valutata. 


4.124 writeccazr < > f<dess file>l 


Questa funzione scrive un carattere sullo schermo 0 in un file aperto descritto da <desc file>. 
<num> -è il codice ASCII che rappresenta il carattere ed è anche il valore restituito dalla 
funzione. Ad esempio: 


(write-chaz 67) | restituisce 67 
e scrive la lettera C sullo schermo. Supponsnedo che F sia il descrittore di un file aperto, allora: 

(write-char 67 £) restituisce 67 
* scrive la lettera C in quel file. 
I sistemi operativi sotto ai quali funzionano AutoCAD e AutoLISP utilizzano convenzioni 
Sifierenti per segnaiare la fine di una linea in un file di testo ASCII. UNIX, ad esempio. 
utilizza un solo carattere per indicare una nuova linea (LF. codice ASCII 10), mentre PC- 
DOS/MS-DOS utilizza una coppia di casameri (CR/LF. codici ASCII 13 e 10). Per facilitare la 
redazione di programmi AutoLISP trasferibili tra diversi sistemi operativi gestiti da AutoCAD. 
WRITE-CHAR accetta tutte le convenzioni e restituisce un solo carattere di nuova linea (codice 
ASCII 10) ogni volta che incontra un carattere (o una sequenza di caratteri) indicante una fine 
“i linea. Ad esempio. su sistemi PC-DOS.MS-DOS: 

(write-char 10 2) restituisce 20 


ma scrive nel file la sequenza di caratteri CR/LF (codici ASCII 13 e 10). WRITE-CHAR non 
suò scrivere un carattere nullo (codice ASCII 0) in un file. 
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4,12 ( degno <s de >» f< 2515) 

Questa funzione scrive una stringa sullo schermo o in un file aperto descritto da <desc file>. 
Essa restituisce la stringa citata come di consueto ma omette le virgolette quando la scrive in un 
file. Supponendo che F sia un descrittore valido di un tile aperto, allora: 


(write-line "Tast" £) scrive Test * erestituisce "Test" 


4,126 (zer < > 


Questa funzione restituisce T se <eiemento> è un numero reale o intero che dà zero. in caso 
contrario restituisce NIL. Non è definita per altri tipi di elementi. Esempi: 


(zerop 0) restituisce pui 
(zerop 0.0) restituisce T 
(zerop 0.0001) restituisce NIL 


4,127 (*error* <stringa>) 


Questa è una funzione per la gestione di errori ed è definibile dall'utente: se non è NIL. viene 
eseguita come funzione ogni volta che si avvera una condizione di errore in AutoLISP. Il suo 
unico argomento è una stringa che contiene la descrizione dell'errore. Esempio: 


(defun *error* (st) 
(princ "errore: ") 
(princ st) 
(terpri) 

) 


Questa funzione ha esattamente lo stesso effetto del gestore di errori standard di AutoLISP: 
visualizza "errore: e la sua descrizione, 
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Capitolo 5 


Accesso a entità e dispositivi 


Tramite un gruppo di funzioni di AutoLISP è possibile accedere alle entità di AutoCAD, allo 
schermo grafico e ai dispositivi di immissione dati. Si possono selezionare entità, esaminarne i 
valori e modificarli. Inoltre è possibile memorizzare gruppi di selezione in variabili LISP per 
operare con insiemi di entità. Dato che la funzione COMMAND permette di sottoporre comandi 
ad AutoCAD per creare direttamente delle entità, non sono previste funzioni speciali per questo 
scopo. 


1_TIoi di dari speciali 


Per rendere possibile l'accesso a entità AutoCAD, sono stati implementati in AutoLISP due tipi 
di dati speciali: nome d'entità e gruppo di selezione. Questi tipi di dati vengono manipolati solo 
dalle funzioni che li elaborano e la loro struttura interna non è rilevante per la programmazione 
in LISP. Il nome d'entità è un indicatore in un file mantenuto dall’Editore di Disegni. dal quale 
AutoLISP è in grado di reperire il registro della base di dati grafica dell'entità e i suoi vettori 
(se sono sul monitor). Un gruppo di selezione e semplicemente un insieme di nomi d'entità. 


I nomi di entità e i gruppi di selezione sono validi solo per la sessione dell'editore di disegni 
durante la quale vengono ottenuti da AutoCAD. 


Inoltre, funzioni relative ad entità possono richiamare e manipolare gli idemiificaiori di entità 
permanenti che AutoCAD associa ad ogni entità. AutoLISP. interpreta questi identificatori come 
stringhe composte da cifre esagesimali. 


RESTO da 


52 Funzioni relative al erunpo di selezione 


Le funzioni che seguono effettuano varie operazioni con il gruppo di selezione. 


- (sso: L< >I '<pti> f<corz>1! 


La funzione SSGET restituisce un gruppo di selezione. L'argomento opzionale <modo> è una 
stringa che specifica il tipo di selezione entità. Può trattarsi di "F°, "I°, "U” o “P° che 
corrispondono ai modi di selezione di AutoCAD “Finestra”, "Interseca", "Ultimo" o "Precedente". 
Gli argomenti <ptl> e <pt2> specificano i punti rilevanti per la selezione sottoforma di liste. 
Specificare un punto senza l'argomento <modo> equivale a selezionare un'entità mediante 
puntamento. Se mancano tutti gli argomenti, SSGET presenta il dialogo generale della funzione 
“Selezionare oggetti" di AutoCAD permettendo una costruzione interattiva del gruppo di 
selezione. I gruppi di selezione SSGET contengono solo entità vere e proprie (nessun attributo e 
vertice di polilinea). Esempi: 


(ssget) sollecita l'utente ad eseguire una selezione 


(ssget "P") seleziona il gruppo di selezione precedente 
(sscet "U") seleziona l’ultima entità aggiunta al database 
(ssget ‘(2 2)) seleziona l'entità passante per il punto 2.2 
(ssget "FP" '(0 0) '(5 5)) seleziona le entità nella finestra da 0.0 a 5.5 
{ssget "IN '(0 0) '(1 1)) seleziona le entità intersecanti la finestra 
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da 0.0 a 1.} 
(ssget "x" <lista per £:1*ro>) seleziona le entità idonee allo <lista per 
filtro> 

Gli oggetti selezionati sono evidenziati solo quando SSGET viene usata senza argomenti. Non 
vengono registrare informaziori sui modo in cui l'entità era stata selezionata (rimandiamo a 
ENTSEL che prevede questa possibilità). 1 gruppi di selezione consumano spazio nei file 
temporanei, quindi in AutoLISP non possono essere aperti più di sei gruppi per volta. Quando si 
raggiunge questo limite, AutoCAD non crea più gruppi di selezione e restituisce NIL a tutti i 
ricniami di SSGET. Per chiudere un gruppo di selezione di cui non si ha più bisogno, basta 
assegnargli valore NIL. (Se si è raggiunto il limite di 6 gruppi di selezione aperti, bisogna 
richiamare la funzione GC affinche un'altra SSGET possa operare). 


E' possibile trasmettere ad AutoCAD una variabile di gruppo di selezione in risposta a un 
messaggio qualsiasi di selezione oggetti per cui sia valida la selezione "Ultimo". Questa variabile 
selezionerà tutte le entità nel gruppo di selezione. 


Filtri SSGET (ssget "N") 


lì modo "X° della funzione SSGET esamina l'intero disegno e produce un gruppo di selezione 
contenente i nomi di tutte le entità che rispondo a criteri specificati. Ad esempio, utilizzando 
questo dispositivo. è possibile ottenere un gruppo di selezione comprendente tutte le entità di un 
tipo dato, su un piano dato o di un colore dato. 


Questo nuovo modo SSGET si imposta nella maniera seguente: 
(ssger "X" <lista per filtro>) 
dove <iista per filtro> indica una lista di coppie puntate, paragonabile al tipo di lista restituito 


dalla funzione ENTGET. La «lista per filtro> specifica quali delle proprietà delle entità devono 
essere ricercate e quali sono i valori validi per entrare nel gruppo di selezione. Ad esempio: 


(ssget "X" '((0. CERCEIO"))) 


restituira un gruppo di selezione cne comprenderà tutti i cerchi presenti nel disegno (il codice di 
gruppo 0 è il tipo dell'entità). Parimenti: 


(ssget "X" '((8. “PIANO3") )) 


restituirà un gruppo di selezione che comprenderà tutte le entità contenute nel piano *PIANO3” 
(il codice di gruppo 8 è il nome del piano). Se viene specificata più di una coppia puntata nella 


<lista per filtro>, un'entità, per essere inclusa nel gruppo di selezione. deve soddisfare tutte le 
condizioni specificate. Ad esempio: 


(ssget "X" '((0. "CERCHIO") (B. "PIANOl") (62 +. 2))) 


restituirà un gruppo di selezione contenente tutti i cerchi di colore rosso compresi nel piano 
“PIANOI”. 


Benchè la lista per filtro delle entità abbia lo stesso aspetto di una lista restituita da ENTGET. 
solo una parte dei codici per i gruppi di entità viene riconosciuto da SSGET "X" (vedi la tavola 
seguente). La funzione SSGET "X* agisce esaminando l’intero disegno e paragonando i campi di 
ogni entità con i requisit contenuti nelle lista per filtro. Se le proprietà di un'entità 
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corrispondono a tutti i requisiti contenuti in una lista per filtro, quest'entità viene inciusa nei 
gruppo di selezione che verrà restituito alla fine dell'indagine. SSGET restituisce NIL se non 
viene trovata neila base di dati nessuna entità che corrisponda a tutti i criteri richiesti. Una lista 
per filtro vuota o incompleta fa scegliere a SSGET tutte ie entità contenute nella base di dati. 


[ seguenti codici per i gruppi d'entità vengono accettati da SSGET "X* 


Codice | Significato 
2 Nome dei blocco per referenza (INSER) 


6  |Nome Ger tipo di Linea 
7 












Nome dello stile di testo per Testo, Attributi e definizione degli Attribuzi 


8 |xone Get piano 


38 Elevazione 





39 | Spessore 





| Numero cei cotore 


| Segnatatore degti attributi 


| vettore della direzione di estrusione 30 (lista ci 3 numeri reali) 


Per controllare i codici di gruppo annotati come (numero reaie), dovete fornire un numero reale 
per il valore di controllo. Quindi, per controllare le entità aventi un’elevazione di 2.0; 


(ssget "Xx" '((38 . 2))) i non sarebbe corretto 
(ssget "XxX" '((38 .2.0))) | sarebbe corretto 


SSGET “X° restituirà NIL se la lista per filtro comprende codici di gruppi d'entità che non sono 
compresi in questa tavola. Questo garantisce che i programmi di AutoL.ISP che utilizzano SSGET 
"X° continueranno a funzionare anche quando verranno in futuro aggiunti nuovi codici. 
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APRIRE ati <as> 


Questa funzione restituisce un numero intero che rappresenta il numero di entita presenti nei 
gruppo di selezione <gs>. Il numero viene restituito in forma reale se è maggiore di 32767. I 
gruppi di selezione non contengono mai selezioni doppie di un'entità. 

Ad esempio: 


(setq sset (ssget "L")} | pone l'ultimo oggetto nei gruppo di selezione 
SSET 
(sslenght sset) | restituisce | 
53; ‘ssname <cs> <i ce> 


Questa funzione restituisce il nome d'entita dell'<indice>simo elemento del gruppo di selezione. 
Se <indice> è negativo o maggiore dell'entità numerata più alta nei gruppo di selezione, viene 
restituito NIL. Il primo elemento nei gruppo ha l'indice 0. I nomi d'entirà cel gruppo di 
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selezione ottenuti con SSGET saranno sempre nomi di entità principali; le entità secondarie 
tattributi di blocchi e vertici di polilinee) non verranno restituite (vedi ENTNEXT più avanti 
che permette di accedere alle entità secondarie). 


Ad esempio: 


(setq sset (ssget)) : crea un gruppo di selezione chiamato SSET 
(setg enti (ssname sset 0)) ; restituisce il nome della prima entità in SSET 
(setq ent4 (ssname sset 3) ) ; restituisce il nome della quarta entità in SSET 


Per accedere ‘ad entità al di là della 32767esima nel gruppo di selezione, dovete fornire 
l'argomento dell'indice in forma reale. Ad esempio: 


(setq entx (ssname sset 50843.0)) ; restituisce il nome della 50844esima 
entità di SSET 


52.4 _(ssadé f< e > i<as>11 


$e la funzione è richiamata senza argomenti, SSADD costruisce un nuovo gruppo di selezione 
seliza entità. Se richiamata con un argomento contenente un solo nome di entità, SSADD 
sostruisce un nuovo gruppo di selezione contenente quel singolo nome d'entità; se richiamata con 
un nome di entità e un gruppo di selezione, essa aggiunge l'entità denominata al gruppo. SSADD 
restituisce sempre il nuovo gruppo di selezione o quello modificato. Si noti che quando viene 
aggiunta un'entità a un gruppo, la nuova entità viene aggiunta fisicamente al gruppo esistente e 


che il gruppo dato come argomento <gs> viene restituito come risultato. Ne consegue che se il 


gruppo è assegnato ad altre variabili, queste rifletteranno l'aggiunta. Se l'entità denorninata si È. 


trova già nel gruppo di selezione, l'operazione di SSADD sarà ignorata; non verrà riportato 
nessun errore. Facciamo alcuni esempi: 


(setg el (entnex<)) ; assegna alla prima entità nel disegno il nome 
SI El 
ni (seczg ss (ssadd)) : assegna ad un gruppo di selezione nullo il 
È nome SS 

(ssadd el SS) : restituisce il gruppo di selezione SS con 


aggiunta l'entità El 

restituisce l'entità successiva ad El 
restituisce il gruppo di selezione SS con 
aggiunta l'entità E2 


(setq e2 (entnext el)) 
(ssadà e2 SS) 


PIA a+ > <38> 


SSDEL cancella il nome d'entità <nome ent> dal gruppo di selezione <gs> e restituisce il nome 
del gruppo di selezione <gs>. Occorre notare che l'entità viene cancellata fisicamente dal gruppo 
di selezione e che ciò non corrisponde alla restituzione di un nuovo gruppo di selezione con 
l'entità cancellata, Se l'entità non si trova nel gruppo di selezione, viene restituito NIL. 


Ad esempio, poniamo che l'entità El sia un membro del gruppo di selezione SS mentre l'entità 
72 non lo è. allora: 


(ssdel el ss) ; restituisce il gruppo di selezione SS senza 
l'entità E] 
(ssdel e2 SS) i restituisce NIL (non modifica SS) 
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| 2 < >_< > 
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Questa funzione verifica se il nome d'entita <nome ent> è un membro del gruppo di selezione 
<g5>; se è il caso, SSMEMB restituisce il nome d'entita <nome enp, in caso contrario, restituisce 
NIL. 

Ad esempio, poniamo che l'entità El sia un membro del gruppo di selezione SS mentre l'entità 
E2 non lo è, allora: j 


(ssmemb el ss) | restituisce il nome dell'entità EI 
(ssmemb e2 ss) i restituisce NIL 
Funzioni r y id' 


Le funzioni che seguono eseguono varie operazioni relative ai nomi d'entità. I nomi d'entita 
possono essere trasmessi ad AutoCAD in risposta a un qualsiasi messaggio “Selezionare oggetti;” 
che accetta “Ultimo” come risposta valida. Il risuitato sara identico ad una selezione dell'entità 
tramite finestra. 


(entne f<nome ent>? 


Se richiamata senza argomenti, Questa funzione restituisce il nome della prima entità non 
eliminata dalla base dati. Se ENTNEXT è richiamata con l'argomento <nome ent>, restituisce il 
nome della prima entità non cancellata che segue <nome ent> nella base dati. Se non c'è 
un'entità successiva nei data base, viene restimuito NIL. ENTNEXT restituisce sia entità 
principali che secondarie..-..-...... ...-- 
Le entità selezionate da SSGET sono entità principali, quindi non sono né attributi di blocchi né 
vertici di polilinee. Si puo accedere alla struttura interna di queste entità compiesse percorrendo 
semplicemente le entità secondarie con ENTNEXT. Avendo ottenuto il nome di un'entità 
secondaria, si può operare con essa come con ogni altra entità. Dopo aver ottenuto il nome di 
un'entità secondaria mediante ENTNEXT. si puo reperire l'entità principale corrispondente 
percorrendo le entità con ENTNEXT finché viene trovata un'entità SEQEND. estraendo poi il 
gruppo -2 da quell'entità. ciò che equivale al nome dell'entità principale. 


Ad esempio: 
(setq el (entnext)) i assegna alla prima entità del disegno il nome 
EI 
(setg e2 (entrext el)) | assegna all'entità successiva ad El il nome E2 
2 e id 


Questa funzione restituisce il nome dell'ultima entità principaie non eliminata dal data base. 
Questa funzione è usata frequentemente per ottenere il nome di una nuova entità che e stata 
appena aggiunta tramite la funzione COMMAND. Per essere selezionata, l'entità non deve 
necessariamente trovarsi sullo schermo né su un piano scongelato. 
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Ad esempio: 
(sevg el (entlas©)) : assegna all'ultima entita del disegno il nome 
EI 
(sevg e2 (entnexz el) + attribuisce a E2 valore NIL (o assegna il 


nome di un attributo o subentità di vertice) 


Se avete bisogno del nome dell'ultima entità non cancellata (entità vera e propria 0 subentità), vi 
conviene definire una funzione del tipo seguente piuttosto che richiamare ENTLAST. 


(defur lastent (7a 5) 


i£ (seta a (entiast) : trova l'ultima entita vera e propria 
(while (sets D (entnext a)) ‘ se seguono subentità 
(setq a Db) ; ripete finche non trova piu nessuna 
entità 
) 
) 
a + restituisce l'ultima entita 0 
subentita 


5323 (enzseìl '<messazzio?) 


A volte è preferibile selezionare un'entità e, contemporaneamente. specificare il punto con il 
quale è stata selezionata. come ad esempio nei comandi di AutoCAD OSNAP. SPEZZA. 
ESTENDE e TAGLIA. La funzione ENTSEL permette ai programmi di AutoLISP di eseguire 
questa operazione. ENTSEL seleziona un'entità singola richiedendo una selezione mediante 
puntamento e restituisce una lista il cui primo elemento è il nome dell'entità selezionata e il 
secondo è la coppia di coordinate del punto di selezione {relative all'UCS corrente). Se per 
<messaggio> è stata specificara una stringa, essa verra usata per sollecitare l'utente a immettere 
l'efitità, S: invece non è specificata. il messaggio standard sara “Selezionare oggetti”. La 
seduenza che segue mostra l'uso della funzione ENTSEL in AutoCAD e la lista che restituisce. 


Comando: LINEA 
Dai punto: LI 

AI punto: 66 

AI punto: RETURN 


Comando: I 
Selezionare un'entità: 23 
(<Nome entità: 60000014> (3,0 3.0 0.0) 





Una lista some questa restituita da ENTSEL può essere fornita ad AutoCAD in risposta a uno 
qualsiasi csi suoi messaggi di selezione oggetti e verrà interpretata da AutoCAD come punto di 
selezione dell'entità specificata. 


534 ‘*“andent <idenzizicatore> 


Il nome cdi un'entità può campiare da una sessione di editazione all'altra, un identificarore di 
entità rimane però costante per Tutto il periodo di esisienza di un'entità. L'argomento 
<identifizstore> è una strin3 contenente l'identificatore d'entità, la funzione HANDENT 


restituises il nome dell'enuta associata con quell'identificatore nella sessione di editazione 
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(nandent "5A42") restituirebbe <nome dell'entità: 60004722> 


in una particolare sessione di editazione. La stessa chiamata può restituire in un'altra sessione di 
editazione del medesimo disegno, un nome di entità differente. Può trattarsi deila medesima 
entità e il suo identificatore avrà di conseguenza sempre lo stesso nome ma il nome dell'entità 
può modificarsi di sessione in sessione. 


S,4 Funzioni relative ai datl di entità 


Le funzioni che seguono permettono di richiamare e modificare i dati che definiscono un'entità 
e utilizzano tutte i nomi d'entità per specificare le entità su cui operano. 


4 ( è < >) 


L'entità specificata dal <nome ent> viene cancellata se si trova nel disegno e ripristinata se è 
stata cancellata nella stessa sessione. Entità cancellate sono eliminate dal disegno quando si esce 
dall'Editore di Disegni, quindi ENTDEL puo ripristinarie solo nella sessione in cui erano state 
cancellate. ENTDEL opera unicamente su entità principali; gli attributi e i vertici di polilinee 
non possono essere cancellati indipendentemente dalle entità a cui si riferiscono. Per ottenere 
questo tipo di cancellazione bisogna ricorrere alla funzione COMMAND e richiamare i comandi 
EDITATT o EDITPL. 

Ad esempio: 


(sete el (entnext)) ‘ assegna alla prima entità del disegno il nome 
vera EI 


(entdel el) alan i cancella l'entità El 
(entdel el) i ristabilisce l'entità cancellata E! 
4,2 ( {eg < ent> 


L'entità il cui nome è <nome ent> viene richiamata dalla base dati e restituita sottoforma di lista 
contenente i dati che la definiscono. La lista risultante ha la forma di una lista di associazioni. 
dalla quale è possibile estrarre slernenti con la funzione ASSOC. Alle entità contenute neila lista 
risultante sono assegnati i codici di gruppo del file DXF di AutoCAD per ogni parte dei dati 
che definiscono l'entità. 


Per l'esempio seguente partiamo dai seguenti presupposti: 


= il piano corrente è "0° 

= il tipo di linea corrente è CONTINUO" (valore standard) 
» l’elevazione corrente è 0 (valore standard) 

» gli identificatori di entità sono disattivati e 

wla variabile di sistema FLATLAND è 0 


Disegniamo una linea con questa sequenza: 
Comando: LINEA 
Dali punto: Li 


Al punto: 66 
AI punto: RETURN 
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1 dati d'entità relativi alla linea possono essere richiamati immettendo: 


Comando: {sera a fenteet tentiasi))) 


Presupponendo che FLATLAND è 0 \vengono richiesti punti 3D), si darà ad A il valore della 
lista seguente: 


( (-1 . <Nome entità: 60000014>) 


(O. “"LINEA") p ; Tipo d'ennà 
(B_. "0") : Piano 

(120 2.0 2.0 0.0) * Punio iniziale 
(11 6.0 6.0 0.0) + Punto finaie 


) 


L'elemento -| all'inizio della lista contiene il nome d'entità rappresentato da questa lista. La 
funzione ENTMOD descritta più avanti, usa Quesio elemento per identificare l'entità che deve 
essere modificata. 


Le ‘singole coppie puntate che rappresentano i valori possono essere richiamate facilmente con 
ASSOC e CDR viene usato per estrarne i valori, I codici che compongono l'entità sono quelli 
usati da DXF e sono riportati nell'Appendice C della Guida all'Uso di AutoCAD. Come per i 
file DXF, gli elementi d'intestazione delle entità (colore, ripolinea, spessore, flag d'entita 
compiessa, identificatore di entità) sono estratti solo se sono diversi dai valori standard. Ì campi 
opzionali di definizione di entità, invece. vengono estratti in entrambi i casi: sia quando 
corrispondono ai loro valori standard che quando non corrispondono. L'intento è quello di 
semplificare i programmi di elaborazione, dato che i loro algoritmi generali possono sempre 
supporre che questi campi siano presenti. Quindi, a differenza di DXF, le coordinate X, Y. Z 
associate appaiono raggruppate in una lista come (10 1.0 2.0 3.0) e non come gruppi 10, 20€ 50 


separati. 


Si noti che le sottoliste che specificano punti non sono coppie puntate. Per convenzione, il CDR 
della sottolista rappresenta il valore del gruppo. Dato che un punto è una lista di due (o tre: 
numeri interi, il gruppo intero diventa una lista di tre (o Quatiro! elementi. Il CDR del gruppo © 


ta lista rappresentante il punto. quindi si tiene Conto della convenzione secondo cui CDR 
restituisce sempre il valore. 


Quando si serivono funzioni che elaborano queste liste di entità. bisogna renderie insensibili 
all'ordine delle sottoliste. usando ASSOC. 1) gruppo -] contenente il nome d'entità permette alle 
operazioni di modifica di accettare semplicemente la lista d'entità, evitando così la necessita di 
una struttura parallela che gestisca il nome d'entità. Un'enuta SEQEND al termine di una 
polilinea o di un insieme di attributi contiene un gruppo -2 il cui CDR è il nome d'entità 
dell'intestazione di questa entità. In questo modo l'intestazione può essere reperita in un'entità 
secondaria avanzando fino a SEQEND e utilizzando in seguito il CDR del gruppo =2 per trovare 
il nome d'entità dell'entità principale. 


L'esempio che segue illustra la rappresentazione di un'entità complessa sottoforma di lista. Per 
questo esempio siamo partiti dal presupposto che I"UCS corrente e ruotato di 40 gradi in senso 


antiorario intorno all'asse X del WCS. che gli identificatori di entità sono attivati e che la 
variabile di sistema FLATLAND è 0. 
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Comando: TLINEA 
?/Creare/Richiamare/Selezionare: 


SELEZIONARE 
Nuovo tipolinea per entità <DAPIANO»: TRATTEGGIATA 
2/Creare/Caricare, Impostare: RETURN 


Comando: COLORE 
Nuovo colorè per entità <DAPIANO>: BLU 


Comando: PIANO 
?/Def/Piano corrente/Nuovo/ON/OFF?Colore/Tipolinea/conGelare/Scongelare: DEF 


Nuovo piano corrente <0>: 
*/Def/Piano corrente/Nuovo/ON/OFF/Colore/Tipolinea,/conGelare/Scongelare: RETURN 


Comando: TESTO 


Punto iniziale o Lunghezza/Centrato/Fisso/Mezzo/Destra, Stile: end 
Altezza <0.2000>: .ì 
Angolo di rotazione <0>: 30 


Testo: Schema idraulico 
Comando: (seta e ‘entrer fentlasti)) 
In questo caso assegnamo ad E il nome dell'entita di testo e ED corrispondera alla lista che 


segue. Rimandiamo all’Appendice C della Guida all'Uso di AutoCAD per chiarire il senso della 
lista seguente. 


( (+1. <Nome entità: 6000003C>) lai sen 


(0. "TESTO") : Tipo di entità 

(8°. "SCHEMA") : Piano 

(6 . "TRATTEGGIATA") : Tipolinea 

(62 . 5) » Colore 

(5. "7E"}) » Identificatore 

(10 2.0 2.0) : Punto iniziale 

(40 . 0.3) > Altezza 

(1°. "Schema idraulico") 

(50 . 0.523599) ‘ «ngoio di rotazione ‘ "2aianti ) 
(41. 1.0) ‘ Fattore di spessore 

(5L. 0.0) : Angolo obliquo 

(7. "STANDARD") ‘ Stile di testo 

(71. 0) * Flags di generazione 

(72. 0) 3 Giustificazione 

(22 0.0 0.0) i Punto ai allineamento 

(210 0.0 -0.642788 0.766044) : Vettore direzione di estrusione 


) 


Tutti i punti associati con un'entità sono espressi relativamente al Sistema di Coordinate d'Entità 
(ECS). Per punti, linee. linee 3D, facce 5D, polilinee 3D, reti 3D e entità di quotatura, l'ECS 
equivale al WCS (i punti dell'entità sono in coordinate globali). Per tutte le altre entità, l'ECS 
{ può essere derivata dal WCS e dalla direzione di estrusione dell'entità (il suo gruppo 210). 

Quando si opera con entità che sono state disegnate con sistemi di coordinate differenti dal WCS 
(come il testo dell'esempio precedente), si rivelerà necessario convertire i punti in coordinate 
giobaii o coordinare dell'UCS corrente utilizzando la funzione TRANS. Utilizzando l'entità testo 
di cui sopra come esempio, avremo: è 
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(setq p (cdr (assoc 10 ed))) restituirebbe (2.0 2.0 3.5) 


e definirebbe P come il prossimo punto iniziale relativamente all'ECS dell'entità di resto. (Notate 
che il punto viene restituito in questa forma indipendentemente dall'UCS corrente al momento 
dell’ENTGET). 


(trans pe O)  restituirebbe (2.0 1.53209 1.28558) 


E (il nome dell'entità di testo) viene utilizzato come codice di conversione di partenza e 
trasforma le coordinate ECS del punto iniziale del testo in coordinate globali. 


Se la variabile di sistema FLATLAND è diversa da 0 € l'entità in questione è stata disegnata in 
un UCS equivalente al WCS, ENTGET restituisce i suoi punti come punti bidimensionali del 
WCS con un gruppo 38 che definisce l'elevazione Z dell'enuta (se diversa da 0). ìn questi casi il 


gruppo 210 (direzione di estrusione) non viene restituito. 


54,3 semod_<lisca ent> 


ENTMOD riceve una lista (<lista ent>) nel formato restituito da ENTGET e aggiorna la base 
dati dell'entità specificata dal gruppo 1 in <lista ent>. Quindi il metodo principale con cui LISP 
aggiorna la base dati è: richiamare l'entita con ENTGET. modificare la lista che definisce 
l'entità (si noti che la funzione SUBST è molto utile a questo scopo) e aggiornare infine Ventita 
nel data base tramite ENTMOD. 


Ad esempio: — --. 
(sete en ( enznext) ) ; assegna alla prima entità del disegno il nome 
EN 
(setq ed (entget en)) ; assegna al dato per il nome dell'entità EN il 
nome ED 
(sete ed 
" (subst (cons 8_"o") 
se (assoc 6 ed) : modifica il gruppo relativo al piano in ED 
ed - e lo fa corrispondere al piano "0" 
) 
) . 
(encmoà ed) : modifica il piano dell'entità EN nei disegno 


ENTMOD impone alcune restrizioni concernenti i parametri da modificare. In primo luogo, il 
tipo di un entità e l'identificatore non possono essere modif icati. (Se si vuole cambiario, bisogni 
cancellare l'entità con ENTDEL è crearne una nuova con COMMAND). AutoCAD deve pote! . 
riconoscere tutti gli elementi ai quali fa riferimento la lista d'entità prima che ENTMOD vene: 
eseguita. Quindi lo stile di testo. il tipo di linea. i nomi di forme o di blocchi devono gia essere 
stati definiti in un disegno prima che possano essere usati in una lista d'entità con ENTMOD. | 


Fanno eccezzione i nomi dei piani. Infatti ENTMOD creerà un nuovo piano Con i valori 


standard dati dal comando “PIANO NUOVO" ogni volta che incontra un riferimento a un piano | ui 


non definito in una lista d'entità. 


Quando modificate i campi d'entità contenenti valori a virgola mobile, (come ad esempio 
spessore), ENTMOD accerta un numero reale per il nuovo valore «e lo converte in valore 4 


virgola mobile. Se fornite un numero a virgola mobile per un campo di entità intero (come il 


numero di colore), ENTMSOD lo tronca € lo converte in un intero. 
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ENTMOD esegue lo stesso controllo di consistenza suila lista fornita. come quello di DXFIN sui 
dati che provengono dal file DXF. Se viene individuato un errore grave che impedisce di 
aggiornare il data base, viene restituito NIL. In caso contrario, ENTMOD restituisce la lista data 
come argomento. ENTMOD non modifica campi interni quali il nome d'entità nel gruppo -2 di 
un'entità SEQEND; tentativi di modificare tali campi non sono presi in considerazione. 


Quando viene aggiornata un'entità principale. ENTMOD modifica l'entità e aggiorna l'immagine 
sullo schermo (entità secondarie comprese). Quando si usa ENTMOD per aggiornare un'entità 
secondaria. questa verrà aggiornata. nei data base ma l’immagine suilo schermo rimarrà invariata. 
Dopo aver apportato tutte le modifiche alle entità secondarie, si può ricorrere alla funzione 
ENTUPD descritta qui di seguito per aggiornarne anche l'immagine sullo schermo. 


44 f < ant> 


Quando si modifica il vertice di una polilinea o l'attributo di un blocco con ENTMOD, l'entità 
principale non viene aggiornata sullo schermo. Ad esempio, se per modificare 100 vertici di una 
polilinea complessa, la polilinea dovrebbe essere ricalcolata e rivisuaiizzata ogni volta che viene 
modificato uno dei suoi vertici. il processo di elaborazione verrebbe rallentato notevolmente. Per 
questa ragione è prevista la funzione ENTUPD che permette di aggiornare sullo schermo anche 
una polilinea (o un blocco) modificata. ENTUPD è richiamata con il nome d'entità di un 
componente qualsiasi della polilinea 0 del blocco; non deve necessariamente trattarsi dell'entità 
d'intestazione, infatti ENTUPC la reperisce automaticamente. ENTUPD è prevista per polilinee 
e blocchi, ma puo essere usata anche per qualsiasi altra entità; essa rigenerera sempre l'entita 
sullo schermo, entità secondarie comprese. 


Ad esempio, supponiamo che la prima entità di un disegno sia una polilinea con alcuni vertici: 


(setq el (entrext)) | assegna alla polilinea il nome El. 
(setq e2 (entrexc el)) ; assegna al primo vertice il nome ED 
(setg ed (entgaet e2)) ; assegna ED al data relativo al vertice 
(setq ed 


(subst '(10 1.0 2.0) 
(assoc 10 ed) ; cambia la posizione del vertice in ED 


ed : lo trasporta nei punto 1,2 
) 
) 
(entmod ed) i muove il vertice nei disegno 
(setupd el) . rigenera la polilinea EI 


4.6 R izi 


I nomi ci entità e i gruppi ci selezione sono validi solo durante la sessione di editazione nella 
Quale sono stati ottenuti da AutoCAD. Se si prova ad eseguire ie seguenti operazioni mentre un 
comando come PLINEA o EDITATT è azionato, si otterra un NIL e ia funzione richiesta non 
verrà eseguita, 


ENTMOD =per modificare un'entità già esistente 


ENTUPD -per rigenerare un'entità complessa modificata 
ENTDEL “per ristabilire e rigenerare un'entità previamente cancellata 
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zz TU i i d $ È : in 

I nomi d'entità e i gruppi di selezione sono risposte valide ai messaggi "Selezionare oggetti: di 
AutoCAD che prevedono la selezione "Ultimo". Ne segue che le entità richiamate da LISP 
possono essere usate dai comandi di AutoCAD. 


Nei casi in cui AutoCAD permette di selezionare oggetti tramite puntamento, il processo di 
selezione accetterà le liste del tipo di quelle fornite da ENTSEL. L'entità viene selezionata e 
viene specificato il punto di selezione. Ìn questo modo LISP può trasmettere punti di selezione 
per un'entità specificata a comandi quali SPEZZA, RACCORDO, CIMA, TAGLIA ed 
ESTENDE. Occorre notare che le liste del tipo ENTSEL possono essere usate anche per altre 
selezioni. a condizione che il comando accetti la selezione tramite puntamento. 


£,6 Note sulle curve del tino Ve sulle splinee 


Quando utilizzate ENTNEXT per passare da un vertice all'altro di una polilinea, incontrerete 
probabilmente alcuni vertici che voi non avete esplicitamente creato. Infatti le opzioni "V" 
(curva a V) e "S° (splinea) del comando EDITPL creano automaticamente dei vertici ausiliari. 
Potete ignorarli, dal momento che ogni modifica apportata ad uno di questi vertici scomparirà la 
prossima volta che ricorrerete alle opzioni "\" e "S° di EDITPL con la polilinea in questione. 


Dal gruppo d'entità con segnalatore 70 potete dedurre se la polilinea è stata trasformata in una 
curva a V o in una Splinea. nel primo caso il valore in bit sarà 2, nel secondo caso sarà 4. Se 
nessuno di questi due valori è presente. significa che i vertici della polilinea non sono stati 
manipolati. Se è presente il valore 2 (curva a V), un vertice su due avrà valore in bit uguale a | 
per indicare che si tratta di vertici aggiunti durante il procedimento per la produzione della 
curva a V. Se utilizzate ENTMOD per spostare ; vertici con l'intento di modificare la curvatura 
richiamando EDITPL, vi conviene ignorare tali vertici. 


Se è presente il valore 4 (spliinea), troverete alcuni vertici con valore 1 (inseriti durante il 
procedimento di curvatura a V se la variabile SPINESEGS era negativa) e altri con valore $ 
(inseriti durante la creazione della splinea;, tetti gli altri vertici avranno valore 16 (punti di 
riferimento della splinea). Anche in questo caso. se utilizzate ENTMOD per spostare i vertici 


zon l'intento di modificare 1]: curvatura richismando EDITPL. vi conviene ignorare tutti i 
vertici tranne quelli corrispondenti a punli di riferimento. 


£I so_all vola dei simboli 


Sono state inserite in AutoLISP le funzioni TBLNEXT € TBLSEARCH, che permettono l'accesso 
(per sola consultazione) alle tavole di simboli riguardanti i piani, i tipi di linea, gli stili di testo, 
la vista contrassegnata da nome € la definizione dei blocchi di AutoCAD. Diamo una breve 
descrizione di queste funzioni: 


n.1 (k2ìne < e_del *avola>» '<primo>) 


i.) 


Questa funzione viene impiegata quando si vuole esaminare il contenuto di una intera tavola di | 


simboli. Il primo argomento è una stringa che identifica la tavola di simboli che interessa. Nomi 
validi per la tavola sono: "L YER®, "LTYPE", "VIEW", "STYLE" e "BLOCK". *UCS" e "VPORT. 
Non c'è bisogno che la stringa sia impostata in lettere maiuscole. Se TBLNEXT viene usato 
fiperutamente, restituisce sempre la nuova entrata nella tavola specificata (la funzione 
TBLSEARCH, descritta in seguito. imposta la nuova entrata da richiamare). Se è presente anche 
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il secondo argomento e ha un valore diverso da NIL. ‘a tavola dei simboli viene ricaricata e 
viene rintracciata la prima entrata aila tavola; altrimenti viene rintracciata la seconda entrata. Se 
non si riscontrano altre entrate, viene restituito NIL. Entrate cancellate non vengono mai 


restituite. 


Se viene trovata un'entrata, viene ritornata sotto forma di lista di coppie puntate di valori e 
codici del tipo DXF, molto simili a quelle restituite da ENTGET. Ad esempio: 


{tblnext "layer" T) (rintracciare il primo piano) 
può restituire: 
((O. "LAYER") (tipo di simbolo) 
(2. "0") (nome del simbolo) 
(70 . 0) (contrassegni) 
(62 . 7) (numero del colore. si ottiene un numero negativo 
se il disposttivo colore non è azionato) 
(6. "CONTINUOUS") (nome del tizo di linea) 


} 


Va notato che qui non esistono gruppi “-I°. AutoCAD ricorda l'ultima entrata che e stara 
resutuita per ogni tavola e restituisce la successiva ogni volta che TBLNEXT viene chiamata per 
queila tavola. Quando si inizia a esaminare il contenuto di una tavola. è importante assicurarsi 
case il secondo argomento che si fornisce per ritornare alla prima entrata della tavola. non 
corrisponda a un valore NIL. 


Entrate tratte dalla tavola "BLOCK" includono un gruppo “-2° che ha come "nome d'entità” la 


prima entità nella definizione di blocco (se ne esiste una). Quindi, dato un blocco chiamato 
"BOX": i Seite Si 


(tblnext "block") (rintracciare la definizione del blocco) 


puo restituire: 


((0°. "BLOCK") {tipo di simbolo; 
(2. "BOX") (nome del simbolo; 
(70 . 0) ( contrassegni) 

(10 9.0 2.0 0.0) (origini X.Y.Z} 
(+2. <Nome dell'entità: 40000126>) (prima entità) 
) 


Il nome d°entità nel gruppo "-î° è ammesso da ENTGET e da ENTNEXT. ma non da tutte ie 
altre funzioni di accesso alle entità. Perciò non è possibile modificare una tale entità tramite 
ENTMOD e neppure usare SSADD o ENTSEL per poria in un gruppo di selezione. Fornendo a 
ENTNEXT il nome “-2° per un gruppo d'entità. è possibile esaminare tutte le entità comprese 
all'interno deli blocco di definizione: ENTNEXT restituisce NIL dopo aver mostrato l’ultima 
entità nel blocco di definizione. 


Se la variabile di sistema FLATLAND è 0. TBLNEXT restituirà sempre punti tridimensionali in 
forma di liste di 4 elementi dei tipo (10 1.0 2.0 3.0). Se FLATLAND è diversa da 0, alcuni 
punti 3D vengono restituiti come liste a 3 elementi (2D) con la componente Z in coppie puntate 
separate di gruppo 30. 
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51,2 (tb) sezrch <nome della tavol a> <simbolo>) {<px ossimo> . 


Questa funzione ricerca la tavola di simboli identificata col nome che viene inserito in <nome di 
tavola> (stessa procedura di TBLNEXT), e cerca il nome di simbolo che è stato inserito in 


<simbolo>. Entrambi i nomi inseriti vengono automaucamente convertiti in lettere maiuscole. Se 
viene trovata un’ entrata per il nome di simbolo dato, tale entrata viene restituita nel formato 
descritto da TBLNEXT. Se invece non viene trovata nessuna entrata che corrisponda ai dati 


inseriti, appare NIL. Ad esempio. 


(tbìsearch "style" " standard") (rimiracciare lo stile di testo) 


7 


può dare come risposta: 


((0. "STYLE") (ripo di simbolo) 
(2. STANDARD") (nome dei simbolo) 
(70 . 0) (contrassegni) 
(40. 0.0) (altezze jissata) 
(412. 1.0) (fattore si profondità) 
A (50 . 0.0) (angolo obliquo) 
(a (71. 0) (contrassegni di generazione) 
x (3. "txt") (file dei carattere primario) 
DE (4. !") (file del caranere gigante) 
) 


Solitamente TBLSEARCH non ha nessun effetto sull'ordine delle entrate restituite da 
TBLNEXT._Però, se TBLSEARCH dà la risposta cercata € l'argomento <prossimo> è presente © 
ha valore diverso da NIL, il contatore d'entrate di TRLNEXT viene impostato in modo tale che 
la prossima chiamata di TBLSEARCH restituirà l'entrata seguente a quella restituita nella 
presente chiamata. 


L'argomento <prossimo> è molto utile quando si lavora con la tavola di simboli VPORT dato che 
tutte le finestre in una configurazione particolare zortano il medesimo nome. Per trovare ed 
elaborare ogni finestra nella configurazione chiamz: “4VIEW". ad esempio, potete utilizzare ii 
codice seguente: 


(sete Vv (tlpsearch WyPpOoRT" “"4VIIH" T)) trova la prima entrata 
(while (and v (* (cer (assoc 2 v)) VAVIEW") ) 

... glabora l'entrata ... 

(seco v (tbinexT "vPORT") ) i trova la prossima entrata 


) 


Se la variabile di sistema FLATLAND è 0, TBLSEARCH restituirà sempre punti tridimensionali 

‘ in forma di liste di 4 elementi del tipo (10 1.0 2.0 3.0). Se FLATLAND è diversa da 0, alcuni 
punti 3D vengono restituiti come liste a 3 elementi (2D) con la componente Z in coppie puntate 
separate di gruppo 30. 





Le funzioni descritte in questo paragrafo permettono di accedere direttamente allo schermo 
grafico di AutoCAD -e ai dispositivi di input a partire da LISP e permettono 2 comandi 
implementati in LISP di interagire con l'utente come se fossero stati implementati in AutoCAD. 
Queste funzioni possono provocare disturbi sulio schermo; la sequenza che segue serve 2 
eliminare questi inconvenienti: 
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(grtext) 
(redraw) 


Queste funzioni sono destinate solo a programmaiori esperti. Comunque, la maggior parte delle 
applicazioni di LISP non le utilizzano. A coloro che intendono servirsi di queste funzioni occorre 
far notare che la loro azione puo cambiare da una versione di AutoCAD all'altra e che la 
Autodesk AG non garantisce la compatibilità verso l'alto delle applicazioni che fanno uso di 
queste funzioni. Inoltre, è probabile che le applicazioni che utilizzano le funzioni GRTEXT e 
GRREAD non funzionino in maniera identica su configurazioni hardware diverse, a meno che il 
programmatore si attenga alle regole d'uso descritte qui di seguito. 


( ear 


Questa funzione cancella la finestra corrente. (Sui sistemi monoschermo passerà prima dallo 
schermo testo allo schermo grafico.) Le aree riservate alle sequenze di comando, ai menu e alle 
informazioni correnti, restano invariate. Per ripristinare l'immagine sullo schermo grafico basta 
usare la funzione REDRAW. 


58,2 (ardrav <da> <a> <cclcre> '<evidenziare>1) 


GRDRAW disegna un vettore fra due punti nella finestra corrente. <da> e <a> sono i punti 
bidimensionali o tridimensionali (liste di due o tre numeri reali) che specificano le estremità del 
vettore relativamente all'UCS corrente. AutoCAD ritaglia il vettore in modo da adeguario allo 
schermo. li vertore viene disegnato con il colore specificato dall'argomento <colore> coa---+-che 
significa "inchiostro XOR", cioè un inchiostro immaginario che cancella elementi disegnati 
quando li incontra e viene cancellato a sua volta se gii si disegna sopra. Se è presente 
l'argomento opzionale <evidenziare> e questo è diverso da zero, il vettore viene evidenziato 
(solitamente con linea tratteggiata). Se <evidenziare> non è fornito o è pari a zero, viene usato il 
modo di visualizzazione normale. 


(omsexnte "< 





GRTENT permette ad AutoLISP di scrivere nelle porzioni di testo dello schermo grarico di 
AutoCAD. Se richiamato con un numero di casella tra d e la casella del menù di schermo con il 
numero più alto meno l, GRTEXT visualizza l'argomento di stringa <testo> nella casella 
specificata. Il <testo> viene troncato se oltrepassa la lunghezza della casella oppure gii vengono 
aggiunti spazi vuoti quando non la riempie. Se l'argomento opzionale <evidenziare> e presente 
ed è diverso da zero, il testo neila casella indicata verrà visualizzato normalmente (si noti che 
evidenziare una casella ha come conseguenza che una qualsiasi altra casella evidenziata viene 
visualizzata normalmente). Quando si scrive neile caselle di menù, il testo deve essere scritto 
dapprima senza l'argomento <evidenziare» e in seguito evidenziato. Ai richiami di 
visualizzazione normale e di evidenziazione bisogna fornire la stessa stringa di testo (quella 
scritta nella casella). Se non si osservano queste regole. è probabile che i programmi in LISP 
funzionino diversamente su dispositivi di visualizzazione diversi. 


Occorre norare infine, che questa funzione visualizza il testo fornito nell'area di menù sullo 
schermo senza modificare l'opzione di menù corrispondente. Inoltre, su alcuni monitor. le voci 
del menù normale vengono evidenziate ricolorando il resto della voce, per cui il testo GRTEXT 
ritornerà al resto della voce di menu quando l'utente evidenzia la porzione dello schermo 
occupata da questo. Su altri monitor. l'area di menù viene riscritta ogni volta che viene eseguita 
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un'operazione di cambio schermo 0 ogni volta che lo schermo viene rigenerato o ridisegnato. 
Sulla maggior parte dei monitor, comunque, il testo GRTEXT rimarra nell'area di menù finchè 
il menù non viene sostituito da un altro menù. 


Se GRTEXT è richiamata con il numero di casella -1, il testo verrà scritto sulla riga monitor di 
stato e di modo. La lunghezza di questa riga differisce da un monitor all'altro (la maggior parte 
dei monitor accetta 40 caratteri, un'eccezione è il Color Graphics Adaptor di IBM). Se il testo 
non rientra nello spazio a disposizione, esso verrà troncato. » 


Se si usa îl numero di casella -2, GRTEXT scriverà il testo nella riga monitor delle coordinate. 
Si noti che se è attivata la visualizzazione continua delle coordinate, i valori scritti in, questa 
casella verranno sostituiti non appena il puntatore invia una nuova coppia di coordinate. Per i 
numeri di casella - 1 e -2 l'argomento <evidenziare> non viene preso in considerazione. 


Infine, GRTEXT può essere richiamata senza argomenti per ridare i valori standard a tutte le 
aree di testo sullo schermo. 


sg. (orzeaò f<agcicmnare?lì 


GRREAD permette di leggere direttamente i dati immessi dai dispositivi di input di AutoCAD e 
c'è la possibilità di associare la visualizzazione delle coordinate agli spostamenti del puntatore. 
Solo comandi molto specializzati usano questa funzione, infatti la maggior parte delle immissioni 
in AutoLISP sono effettuate tramite le varie funzioni "GETxxx" quali GETSTRING, GETREAL 
e così via. L'argomento <aggiornare>, st è presente e diverso da NIL, attiva la visualizzazione 
continua delle coordinate fornite dal puntatore in movimento e non richiede una selezione 
tramite pulsante di selezione. Questo è il meccanismo che AutoCAD utilizza per la specificazione 
dinamica (“trascina"). -- :- 


Questa funzione restituisce una lista il cui primo elemento è un codice che specifica il tipo di 
immissione. ll secondo elemento della lista è un numero intero 0 una lista che rappresenta un 
punto. a seconda del tipo di immissione. I codici per il primo elemento della lista sono; 


È Carattere di tastiera - codice ASCII come secondo elemento 

3 Punto selezionato - coordinate sottoforma di lista 

4 Casella di menu di schermo selezionata - numero di casella come secondo elemento 

5 Coordinate del modo Trascina come secondo elemento: restituite solo se sono il 
secondo elemento e se diverse da NIL. 

6 Voce selezionata del menù BUTTONS -numero del pulsante come secondo 
elemento 

7 Voce selezionata del menù TABLET! -numero della casella come secondo elemento è 

8 Voce selezionata del menù TABLET2 -numero della casella come secondo elemento 

9 Voce selezionata del menù TABLET3 -numero della casella come secondo elemento 

10 Voce selezionata del menù TABLET4 -numero della casella come secondo elemento 

ll Voce selezionata del menù AUX] -numero della casella come secondo elemento 

12 Coordinate associate al pulsante del puntatore restituite come secondo elemento. 
Segue sempre una lista restituita del tipo 6. 

13 Selezione di una voce del menù di schermo evidenziata tramite immissione d2 


tastiera. Il numero della casella È restituito come secondo elemento. 
Se il secondo elemento nella lista restituita è un punto, l'impostazione di FLATLAND determini 


se il punto sarà 3D o 2D. Se FLATLAND è = 0, il punto sarà un punto 3D relativo al'USS 
corrente. altrimenti sarà un punto 2D. 
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Se si preme CTRL C mentre la funzione GRREAD è in corso. si interrompe il programma LISP. 
Ogni immissione ulteriore verra trasmessa direttamente a GRREAD. 
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Capitolo 6 


Gestione della memoria 


I simboli, le funzioni definite dall'utente e le funzioni predefinite descritte in questo manuale 
sono memorizzate neila memoria dei computer soltanto per la durata della sessione di editazione 
in AutoCAD. Quando si lancia AutoLISP, esso richiede due aree di memoria di dimensioni 
consistenti; la prima, chiamata "heap", è l'area in cui sono memorizzate tutte le funzioni e le 
variabili (chiamate anche sodi): più queste aumentano (e più le funzioni sono complicate), più 
spazio verrà occupato nella memoria di "heap". La seconda area di memoria, chiamata "stack". 
contiene argomenti di funzioni e risultati parziali di funzioni; più aumentano i livelli delle 
fuazioni o le ricorsioni, più spazio verra occupato nella memoria di "stack". 


A lam i ll i À 


Questa sezione si riferisce solo ai sistemi PC-DOS/MS-DOS che gestiscono AutoLISP normaie 
oppure AutoLISP Esteso, In altri ambienti, i programmi AutoLISP e i dati memorizzati possono 
essere di dimensioni illimitate. 


I valori standard per le aree di “heap” e “stack” sono: 


Heap = 40'000 bytes (per AutoLISP normale) 
Stack = 3°000 bytes 


Questi valori si sono rivelati come i più idonei per la maggior parte delle applicazioni. (le 
dimensioni della memoria di "heap" in AutoLISP Esteso sono determinate dalla quantità. di 
memoria estesa assegnata a quest'ultimo). 


AutoLISP non può espandere la sua memoria di "heap" o di "stack" mentre è lanciato. Se il 
cumero di funzioni e variabili definite è così grande da occupare tutta la memoria di “heap”, 
AutoLISP visualizza il messaggio: 


Insufficient node space (Spazio nodale insufficiente) oppure 
Insufficient string space (Spazio di stringa insutficiente) 


a verrà interrotta l'esecuzione deila fuozione in corso. Nel caso non ci fosse memoria sufficiente 
per caricare AutoLISP quando si esegue AutoCAD, appare il messaggio: 


Insufficient memory -- AutoLISP disabled 
(Memoria insufficiente - AutoLISP disattivato) 


Per potere utilizzare AutoLISP occorre mettere a disposizione una maggiore quantità di memoria 
ed eseguire nuovamente AutoCAD. 


Se il concetto di aree di "heap" e “stack” così come sono usate nei linguaggi di programmazione 
vi è familiare, avete la possibilità di ricorrere al comando “SET del sistema operativo per 
modificare la quantità di memoria dedicata a queste aree in AutoLISP, Ad esempio, i comandi: 


C>SET  LISPHEAP=30000 
C>SET LISPSTACK=10000 
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inducono AutoLISP a riservare 30000 bytes di memoria per l'area di "heap" e 104000 bytes per 
l'area di "stack". Userete questi valori se i vostri programmi fanno un uso frequente della 
ricorsione iche richiede ulteriore spazio di stack) ma non abbisognano di altrettanto spazio di 
memoria di heap per funzioni € simboli. La somma delle due aree non può oltrepassare 456000 
bytes. Istruzioni di questo tipo possono essere incluse nel file “autoexec.bat" in modo che 
vengano eseguite ognì volta che si fa il "bootstrap” del computer. Questi comandi SET hanno , 
effetto solo su AutoLISP e non alterano la disponibilità di memoria quando AutoLISP non è 
janciato. AutoLISP Esteso ignora l'impostazione di LISPHEAP. 


Per AutoLISP Esteso. la variabile d'ambiente LISPXMEM specifica la posizione e le dimensioni 
dell'area dellla memoria estesa nella quale risiede AutoLISP e che verrà utilizzata come spazio di/ 
heap e di stack. Un valore adeguato a questa variabile permetterà ad AutoLISP Esteso di 
coesistere con altri programmi (compreso AutoCAD) che utilizzano una porzione di questa 
memoria. Se non viene fornito nessun valore per LISPXMEM. AutoLISP Esteso utilizzerà tutta 
la memoria estesa non sfruttata dal programma di gestione del disco di RAM standard (VDISK). 
AutoLISP Esteso fa in modo che l'area di heap e l'area di stack sommate corrispondano a ]4 
megabyres se è disponibile una quantità di memoria estesa sufficiente. 


LISPXMEM viene impostata servendosi del comando di DOS "SET prima di lanciare EXTLISP. 
Potete utilizzare per impostare ISPXMEM uno dei formati di comando seguenti. 


C> SET LISPXMENMf=pgrienzo 
C> SET LISPXMEM=porienza.drmensione 
C> SET LISPXMEM= dimensione 


(PE Pond 


ll primo formato specifica l'indirizzo di partenza più basso che può essere utilizzato per 
AutoLISP Esteso. Questo valore deve essere tra 0100000 e 01000000 (esadecimali) o tra 1024K e 
1638K (espressi in kilobvtes). In altre parole. il valore deve essere espresso in termini di 
indirizzo assoluto oppure in kilobytes. Per specificare in kilobytes occorre aggiungere una “K" al 
numero (es. 1024K = 0100009). Il valore viene considerato come decimale a meno che non inizi 
per."0° o "0x", nel qual caso sarà esadecimale. Questo valore definisce solamente una zona 
mifiima nell'area di memoria estesa che AutoLISP Esteso prenderà in considerazione. Se. ad 
esempio. viene specificato ur indirizzo di partenza che si trova a meta del buffer del VDISK. 
l'area assegnata ad AutoLISP Esteso cominsera alla fine del buffer del VDISK. 


Il secondo formato specifica invece una zona di memoria estesa fornendo l'indirizzo di partenza 
e un dato spazio (dimensione! al quale AutoLISP Esteso dovra limitarsi. Gli argomenti di 
partenza e dimensione devono essere dello stesso genere e trovarsi all'interno dell'intervallo 
0100000 (1024K) - 01000000 ( 1638K). Ad esempio, per fare in modo che AutoLISP Esteso 
faccia uso di | megabyte di memoria estesa partendo da 1664K (lasciando quindi i primi 640 
kilobvtes di memoria estesa 2 disposizione di un'altro programma), potete servirvi di uno dei 


due formati seguenti: 


> SPXAMEM2=0* 
Co SME {= 1464 24K 


il terzo formato specifica soltanto la quantità massima di memoria utilizzabile da AutoLISP 
Esteso e lascia ad AutoLISP Esteso di decidere il proprio indirizzo di partenza nella maniera 
usuale. 


Se esiste una variabile d'ambiente LISPXMEM ma non è conforme a uno di questi tre formati. 


AutoLISP Esteso utilizzera la sua impostazione standard. occupera cioè tutta la memoria estesa. 
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LISPXMEM è molto simile sia per formato che per funzione alla variabile d'ambiente 
ACADXMEM di AutoCAD. L'unica eccezione è che ACADXMEM dispone di un quarto 
formato possibile (="riense”), che non è impiegabile con LISPXMEM e inoltre ACADXMEM 
serve 2 controllare lo spazio di memoria di impaginazione I/O di AutoCAD mentre LISPXMEM 
controlla l'uso che AutoLISP Esteso fa deila memoria estesa. Bisogna fare attenzione a fornire 
alle due variabili valori che non si sovrappongano, ad esempio: : 


C> SET LISPXMEM=4096K2048K 
C> SELACADXMEMe=6|44K 


Partendo dal presupposto che ii vostro computer dispone di almeno 5 megabytes di memoria 
estesa installata, questa impostazione lascerebbe 2 megabytes 3 disposizione di AutoLISP Esteso e 
i primi 3 megabytes liberi ad uso di un altro programma o di un disco di RAM. L'area di 
memoria estesa di impaginazione I/O di AutoCAD seguirebbe AutoLISP Esteso e utilizzerebbe il 
resto della memoria estesa (ma non più di 4 megabytes, il limite attuale di AutoCAD). 


6.2_Ricupero di memoria nodale 
Quando si creano funzioni e variabili destinate a un impiego temporaneo, si puo associarvi NIL 


per eliminarie a uso ultimato. Supponendo di aver creato una runzione chiamata IMPOST che 
non serve più, si puo digitare: 


(setq impost nil) 


per sbarazzarsene. La memozia nodale (heap) utilizzata dalla funzione viene ricuperata 
rendendola disponibile per altre funzioni e simboli. 


Se si vuole liberare la memoria nodale utilizzata da una variabile del tipo descrittore file. 
restituita dalla funzione OPEN, è necessario eseguire un CLOSE prima di impostare NIL. Esiste 
solo un numero limitato di spazi disponibili per files aperti e se si dimentica di chiudere un file 
questo può fare in modo che lo spazio rimanga occupato. limitando quindi il numero di nuovi 
files che possono essere aperti. 


Esiste anche la possibilità di eliminare (we le funzioni e variabili caricate o definite durante 
una sessione di editazione. AutoLISP gestisce una lista chiamata ATOMLIST che contiene 
inizialmente i nomi di tutte le funzioni e variabili predefinite. (Per esaminarne il contenuto 
basta digitare "'atomiist” in risposta al messaggio "Comando:” di AutoCAD.) Quando si creano 
cuove funzioni e variabili, i loro nomi vengono aggiunti in testa. alla lista ATOMLIST, quindi 
per eliminare tutto ciò che è stato definito si può ridurre ATOMLIST alla sua dimensione 
originale; artenzione tuttavia a non eliminare le funzioni predefinite del sistema. 


Aggiungendo la funzione seguente al file “2cad.lsp" 


(defun C:ELIM (/ i item) 
(seta i 0) 
(while (not(equal(setoe item (run i atomlist)) 'C:ELIM)) 
(i£ (= (type (eval item)) 'TILE) ;assicurarsi che 
i files siano chiusi 
(close (eval item))) 
(seta i (1+ i)) 


) 
(seta atomlist (member 'C:ELD! atomlist) 
'ESEGUITO 
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) 


si può richiamare il comando ELIM per ridurre la lista ATOMLIST e ricuperare la memoria 
nodale usata dalle nuove funzioni e variabili. Se C:ELIM è l'ultima funzione nel file "acad.isp”, 
le funzioni definite precedentemente nel file non verranno eliminate da ELIM dato che sono 


trattate come funzioni predefinite. 


Il meccanismo di ATOMLIST non è una caraueristica standard di LISP e può essere soggetta a 
modifiche nelle versioni future di AutoLISP. Inoltre non è possibile utilizzare lo tecnica di 
riduzione delle ATOMLIST se la paginazione virtuale delle funzioni è attivata; vedi paragrafo 


che segue. 


ki inazi virtuale di funzioni 


Se un'applicazione di AutoLISP oltrepassa la memoria nodale disponibile (determinata dalla 
variabile d'ambiente LISPHEAP o dalia porzione di memoria estesa accessibile ad AutoLISP 
Esteso). si puo attivare li peginczione viriuale di funzioni di AutoLISP per permettere al 
programma di crescere; cocorre eseguire la funzione: 


(vmon) 


prima del primo DEFUN nel programma. Questo attiverà la funzione di paginazione virtuale per 
la durata della sessione di editazione in AutoCAD. Una volta attivata, la funzione di paginazione 
non può più essere disattivata. Solo funzioni create con un DEFUN successivo al richiamo di 
VMON verranno impaginate mentre funzioni definite prima del richiamo di VMON non 
verranno trasferite nella memoria di massa € continueranno a causare interruzioni per 


“insufficient node space”. el, di reni i ai 


Dopo l'esecuzione della funzione VMON, AutoLISP trasferisce nella memoria di massa le 
funzioni usate raramente ogni volta che si supera lo spazio nodale a disposizione e le richiama 
automaticamente quando sono richieste dall'utente. La paginazione avviene in modo automatico 
ed è del tutto trasparente. Le funzioni sono trasferite in un file temporaneo, gestito dalla 
paginazione di file di AUOCAD. Ciò significa che se l'utente cispone di espansione di memoria 


o di memoria estesa sufficiente, essa verra usata per l'archiviazione temporanea delle funzioni e 
ne risulterà un'operazione molto più rapida che un trasferimento su disco. 


Bisogna tenere presente che Questa tecnica di memoria virtuale pagina solo funzioni, ciò 
significa che occorre avere ancora abbastanza memoria nodale 227 l'archiviazione di tutte le liste 
di dati dei programmi nonché i nomi delie funzioni e delle variabili. Quindi, anche se la 
paginazione permette di scrivere programmi molto lunghi senza incorrere in problemi di 
memoria, bisogna comunque determinare la dimensione ottimale per la memoria di "heap" 
mediante SET LISPHEAP. La paginazione virtuale di funzioni non richiede modifiche 
nell'impostazione di LISPSTACK. 


6,4 Consid fon jet 
Le osservazioni seguenti r:guordano meccanismi interni ad AwioLISP che possono essere soggetti 
a modifiche senza previz informazione. Tali osservazioni sono destinate a programmatori pratici 


di LISP. | principianti rossono (è dovrebbero; ignorarie. 
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641 Spazio nodale 


Un nodo è una unità di memoria in grado di rappresentare tutti i tipi di dati di AutoL.ISP.Di 
solito nei sistemi PC-DOS/MS-DOS. un nodo è lungo 10 bytes. Sotto 0S/2 e sulle stazioni di 
lavoro a 32 bit, un nodo è pari a 12 bytes. AutoLISP Esteso utilizza nodi di 12 bytes. Per evitare 
frammentazioni di memoria e un sovraccarico della memoria di heap, i nodi vengono posizionati 
dalle heap in gruppi chiamati segmen:i. La dimensione standard di un segmento corrisponde a 
512 nodi (5120 bytes per nodi di 10 bytes), 


AutoLISP dispone di una lista aggiornata dei nodi “liberi” (nodi al momento non associati ad um 
simbolo). Quando AutoLISP necessita di un nodo per archiviare un simbolo o un valore. 
AutoLISP consulta la lista dei nodi liberi per reperire un nodo disponibile. Se non ne trova. 
esegue un riordinamento automatico (garbage collection) posizionando i nodi che non sono più. 
associati ad un simbolo nella lista dei nodi liberi. Uno di questi nodi viene quindi scelto. Se 
tramite il riordinamento si ottengono troppo pochi nodi liberi, AutoLISP prende un segmento 
addizionale dalla heap. Se vengono invece trovati un numero sufficiente di nodi liberi, questi 
vengono posizionati nella lista o uno di loro viene scelto per soddisfare alla richiesta deli 
momento. Se non e possibile reverire nessun nodo libero dalla heap, viene richiamata la funzione 
di paginazione virtuale (se attiva) per liberare aicuni nodi trasterendo sul supporto di memoria 
ausiliaria la funzione utilizzata più recentemente. Altrimenti viene visualizzato il messaggio 
“iasufficient node space” e la funzione richiedente lo spazio nodale viene interrotta. E° 
importante notare che lo spazio nodale non viene mai restituito alla heap finche non si 
abbandona AutoCAD. 


E° possibile forzare un'operazione di riordino servendosi della funzione GC: 


(ge) 


Va comunque notato che le operazioni di riordino. sono molto dispendiose in termini di tempo e 
non dovrebbero essere eseguite se non in casi strettamente necessari. Conviene lasciare ad 
AutoLISP di decidere quando eseguire un tale riordino. 


43 < . ie 


Lo spazio di memoria di strirga viene sottratto dalla memoria di heap cosi come i segmenti 
nodali. Se il vostro programma richiama le funzioni di allocamento automatico (descritte in 
seguito) per assegnare tutta la. memoria disponibile a nodi. è molto probabile che otterrete ua 
messaggio "insufficient string space" con effetti altrettanto nefasti dal messaggio “insuificient 
node space”. Conviene lasciare alla funzione di allocamento automatico di fare in modo che la 
spazio di stringa resti sufficiente. Lo spazio di stringa e impiegaro per archiviare da nomi di 
simboli a messaggi di richiesta o stringhe di menù. tutte voci che vengono sottoposte 20 
AutoLISP per una valutazione. Se vi servite di voci di menù molto lunghe con espressioni di 
valutazione di AutoLISP, queste richiederanno dalla heap una quantità significativa di spazio di 


stringa contiguo. 

4 À ivi 
La struttura della memoria in AutoLISP è basata su un sistema di puntatori. L'utilizzo di nodi è 
onnipresente. tutto viene rappresentato tramite una struttura nodale. Il semplice arto di far 


corrispondere un simboio ad un valore come in: 


(seta longsyma 3.1415) 
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richiede l'impiego di tre nodi: uno per il posizionamento del simbolo all'interno di ATOMLIST, 
uno per memorizzare il nome del simbolo e uno per memorizzare il suo valore. Se il nome del 
simbolo è lungo al massimo sei caratteri, Questo viene memorizzato direttamente nel nodo del 
nome del simbolo, altrimenti gli viene assegnato uno spazio di stringa dalla heap per 
memorizzare il nome, il nodo del nome del simbolo fa riferimento quindi a questa stringa. 
Utilizzando nomi brevi per simboli si ha perciò il vantaggio di ridurre lo spazio occupato ed 
evitare frammentazioni della heap. 


44 AI 


Potete utilizzare le funzioni ALLOC € EXPAND per controllare manualmente lo spazio di 
allocazione di nodo e di stringa € perfezionare l'efficienza delle vostre applicazioni. Utilizzando 
queste espressioni all'inizio del vostro file “asad.isp" potete preallocare i nodi e riservare una 
certa quantità di spazio di stringa. Questo può ridurre il numero di riordini e aumentare la 


velocità dell'applicazione. 


Porere usare la funzione ALLOC per modificare le dimensioni dei segmenti (il valore standard 
corrisponde a 512 nodi ciascuro]. 


(alloc <numero>) 


ALLOC assegna ad un segmento la quantità di nodi corrispondente a <numero> € restituisce il 
valore precedente. 


Utilizzando la funzione EXPAND, potete allocare manialmente lo spazio nodale impostando un 
numero di segmenti. 


(expand <numero>) 


enumero> è il numero di segmenti che si desidera allocare. EXPAND restituisce il numero di 
segmerti che si possono prendere dalla heap. Tale valore può essere molto inferiore al numero 
impostato dal momento che dipende dalla quantita di heap ancora libera. 


Facciamo alcuni esempi riguarcanti AutoLISP normale sotto PC-DOS/MS-DOS inodi a 10 bytes) 
dato che in questo ambiente lo spazio nodale è molto importante. 


(alloc 1024) 


assegna ad un segmento le dimensioni di 1024 nodi, ciò significa che lo spazio di heap 


necessario dovrà essere pari a 10240 bvtes per segmento. 
(alloc 200) 

assegna ad un segmento valore 100. lo spazio di heap necessario sarà quindi di soli 1000 bytes 

per segmento. 

Se le dimensioni di un segmento vengono mantenute al loro valore standard di 512 nodi, una 

impostazione 8 


(expand 20) 
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richiederà 10 segmenti (51200 bytes), cioè più di quanto è disponibile sotto DOS per uso com 
AutoLISP normaie. Si otterranno quindi solo | 0 2 segmenti. ma chiederne di più non danneggia 
il sistema. 


Vediamo ora questo esempio pratico: 


(allac 3000) ; un segmento sarà pari a 3000 nodi 
(expand l) i si ottengono 3000 nodi liberi (cioè un segmento) 
(alloc 10000) i aumenta le dimensioni di un segmento per evitare di ' 


richiedere ulteriori segmenti 
, 


In questo caso vengono utilizzati 30000 bytes per spazio nodale e il resto della heap viene 
destinato come spazio di stringa. I nodi verranno preallocati e posizionati nella lista dei nodi 
liberi. Nessuna operazione di riordino sarà necessaria finche non sono stati utilizzati tutti i 3000 
nodi. Dopo che questi nodi sono stati esauriti si rivelerà necessaria un'operazione di riordino per 
recuperare ulteriore spazio. (alloc 10000) assegna ad un segmento un valore che evita di allocare 
ulteriori segmenti dalla heap, il cui spazio rimanente restera consacrato alle stringhe. 


Se faceste il contrario, cioè diminuiste successivamente le dimensioni di un segmento finchè la 
richiesta di un nodo si riveli insoddisfacente (es. “(alloc 1) (expana 1)" restituisce 0) finireste con 
l'utilizzare tutta la heap per spazio nodale e ottenere il messaggio di errore "insuîficient string 
space” e in assenza di spazio per stringhe AutoLISP non potrebbe più essere utilizzato. 


5455 CORE " F 
La funzione MEM: 
(mem) 


visualizza lo stato corrente della memoria di AutoLISP e restituisce NIL. “Nodes:* è il numero 
totale di nodi allocato. Tale valore dovrebbe corrispondere alle dimensioni di un segmento 
nodale moltiplicato per il numero di segmenti. "Free nodes:" è il numero di nodi compreso nella 
lista dei nodi liberi e indivicuato da un'operazione di riordino. “Segments:” è il numero di 
segmenti nodali allocaro e la voce "Allocate:" corrisponde alle dimensioni correnti di un 
segmento. “Collections” riporta il numero di operazioni di riordino eseguite, automatica o 
richieste dall'utente, 


Se VMON è attivata vengono aggiunti due ulteriori voci "Swap-in" che riporta il numero di 
funzioni che sono stare immagazzinate in memoria dal file di pagina creato dal sistema di 
memoria virtuale. Si tratta di funzioni di richiesta di impaginazione introdotte dal file di pagina 
sollecitato da un semplice richiamo di funzione. La voce “Page rile:* riporta Ie dimensioni dei 
file di pagina creato per raccogliere le funzioni trasferite alla memoria esterna. 


Ladinia Dirvusie si anzi 


Dopo che è stara eseguita la funzione VMON, tutte le funzioni DEFUN collocano un nuovo 
nodo chiamato iabella di paginazione all'inizio di ogni lista di funzione. Questo nodo è aggiunto 
prima della lista che contiene gli argomenti formali. I nodi delle tabelle di paginazione devono 
essere utilizzati esclusivamente per la paginazione e in nessun caso per programmi scritti 
dall'utente. La funzione TYPE restituisce PAGETB per questi nodi. 
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Quando AutoLISP non ha più abbastanza nodi 2 disposizione, trasferisce la funzione meno 
richiesta nel file di paginazione, salva il suo indirizzo nella tabella di paginazione € libera tutti i 
podi della funzione che segue la tabella di paginazione. La tabella di paginazione è marcata per 
indicare che la funzione è stata trasferita. Quando una funzione trasferita viene valutata, essa 
viene caricata dal file di paginazione (è possibile che a questo punto altre funzioni vengano 
trasferite nella memoria ausiliaria) prima dell'esecuzione. Basta che una funzione sia stata 
trasferita nel file di paginazione una volta; ulteriori trasferimenti liberano semplicemente i suoi 
nodi: non occorre digitare ta funzione dato che è già presente nel file. 


In AuwLISP le funzioni create con DEFUN sono semplicemente delle liste e possono essere 
manipolare come qualsiasi altra lista. 1 programmi che lo fanno devono tener conto della 
paginazione (0 prescindere da VMONI). Le funzioni create cOn DEFUN hanno come primo nodo 
la tabella di paginazione, che quindi si deve tralasciare se si esamina la funzione. Se si crea una 
funzione come lista (senza DEFUN), essa funzionerà perfettamente ma non sarà soggetta alla 
paginazione; ciò significa che si può facilmente oltrepassare la memoria disponibile se si ricorre 
spesso a questo metodo. D'altra parte è possibile bloccare una funzione in memoria ridefinendola 
senza la sua tabella di paginazione. Ad esempio, per bloccare in memoria una f unzione di nome 
ZORP definita con DEFUN. si potrebbe digitare: 


(setg zOorp (car zorp)) 


per cancellare la tabella di paginazione iniziale. Le tabelle di paginazione sono rappresentate da 
spazi vuoti quando si stampa la funzione con PRINT. Per stabilire se una funzione € trasferibile 
0 meno basta verificare se dopo la prima parentesi di sinistra c'è uno spazio; la presenza di uno 
spazio indica che è trasferibile. 


Se si tenta di localizzare una funzione come dato e questa è stata trasferita nella memoria 
ausiliaria, si troverà solo la tabella di paginazione nella lista delle funzioni. L'accesso alla 
funzione non basterà per caricarla, soio la sua valutczione avrà Questo effetto. Quindi se si ha 
l'intenzione di costruire funzioni e modificarie direttamente. conviene costruirie sottoforma di 
liste invece di usare DEFUN, oppure ricorrere all'espediente descritto sopra Per bloccarie nella 
memoria. 


La lista di simboli riconosciuti da AutoLISP si chiama ATOMLIST. Un programma sofisticato 
può manipolare questa lista per ricuperare spazio o per localizzare tutti i simboli. (Come gii 
osservato nel paragrafo precedente, questa non € Una caratteristica standard di LISP e puo essere 
soggetta a modifiche in versioni future di AutoLISP.) Quando una funzione è trasferita nella 
memoria ausiliaria la sua codificazione viene effettuata in base alla supposizione che 
ATOMLIST non cambierà durante la paginazione (se la paginazione f unzionasse in questo modo. 
richiederebbe molto più spazio SU disco e sarebbe cinque volte più lenta). Per rendere 
caricamento di file ulteriormente efficiente, i simboli contenuti in ATOMLIST vengono 
riordinati dinamicamente (i simboli richiamati più recentemente vengono posti in cima alla lista) 
se viene azionata la funzione di paginazione virtuale. Per garantire che ATOMLIST non cambi. 
ATOMLIST viene tolta dalla lista dei simboli accessibili dall'utente. Se si utilizza la paginazione 
virtuale di funzioni, non si deve manipolare ATOMLIST in nessun caso! 
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gruppo di facce 3D. ciò permette l'editazione di ogni oggetto come entità unica (per trasformare 
questi oggetti in gruppi di facce 3D basta applicare il comando ESPLODE). 


Potete utilizzare questo programma in diversi modi: 


Se selezionate la voce "Costruzioni 3D° dal menù a rotolo "Disegno", appare un menù 
ad icone dal quale si possono selezionare gli oggetti tridimensionali implementati in 
questo programma. La prima volta che si compie una selezione, AutoCAD carica il 
programma, se non è già stato caricato. 


Se selezionate "Costruzioni 3D" dal sottomenu di schermo “5D°, AutoCAD carica ii 
programma (se non è già stato caricato) ed è possible selezionare gli oggetti 
desiderati dal menu di schermo. 

E° possibile anche caricare il programma direttamente digitando: 


Comando: (!9ad *1d”) 


Una volta caricato il programma. si puo immettere "3D° in risposta al messaggio 
"Comando:*, il programma reagisce presentando una lista degii oggetti 3D disponibili. 


Comando: îD 
SCatola/ConorScodella/CuPola/Rete/Piramide/SFera, Toro/CUneo: 


*3d.lsp* definisce una funzione "C:XXX®" per ognuno dei tipi di oggetti. potete 
quindi immettere il nome dell'oggetto direttamente in risposta al messaggio 
*"Comando:”. Ad esempio 


Comando: TORO 


è sufficiente affinchè AutoCAD inizi a costruire un toro. 


Le singole opzioni del comando sono descritte qui di seguito. 
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ALI SCATOLA + Scatoiz o cubo 3D 


Questo comando serve 2 disegnare scatole a 
forma di parallelepipedo 0 di cubo. Si inizia 
designando il primo vertice della scatola. La 
lunghezza, larghezza, altezza e angolo di 
rotazione della scatola verranno specificate 


relativamente a questo vertice. 


Comando: SCATOLA 
Vertice della scatola: immettere punio 





Lunghezza: i ere 
Cubo/<Larghezza>: fLugnzg o ha CN ] 
| i 
Se rispondete alla richiesta ze 
Cubo/<Larghezza> immettendo una seconda f e 
distanza, AutoCAD la urilizza come valore Rotazione ceo scoioio ce ra 
della larghezza della scatola € domanda il el primo vence ‘rt 


valore dell'altezza. Se invece si immette "Cc 
o "Cubo", AutoCAD disegna una scatola 
cubica, utilizzando lo stesso valore della 
lunghezza anche per la larghezza e Der 
l'altezza. In entrambi i casi il messaggio di 
richiesta seguente sarà: 


Angolo di rotazione intorno all'asse 2: immettere un angolo 


L'angolo di rotazione specificato è relativo all'asse X corrente; il punto di base per la rotazione è 
il primo vertice della scatole. L'asse di rotazione è parallelo all'asse Z corrente. 


3-2 N 


Questo comando costruisce un cono dopo che ne sono stati specificati raggio © diametro dell 
base e dell'apice e l'altezza della figura. 


Comando: CONO 

Punto di base: jmmeiere punio 

Diametro/<Raggio> delia base: distanza o "D" 
Diametro/<Raggio> dell'apice: distanza "D° 0 RETURN 


Altezza: immettere fisuonzo 
Numero di segmenti <]6>: rglore intero o RETURN 
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Reggio cer’ apice 2 ) 


Reggio cer’ apice . 2 





di dose 


si - R j nie emiecreri 


Questi comandi servono a creare una cupola o una scodella (intesa come parte superiore 0 
inferiore) partendo da un punto centrale e un raggio 0 diametro. E° possibile anche specificare il 
numero di segmenti in ogni direzione che verranno disegnati sulla superficie dell'oggetto. (una 
scodella è costruita come una cupola "capovolta"). La sequenza di comando per creare una cupola 
è riportata qui sotto. 


Comando: 

Centro della cupola: immestere rumo 

Diametro <Raggio>: dissanza 0 “D" 

Numero di segmenti longitudinali <16>: vg/gre intero o RETURN 
Numero di segmenti latitudinali <8>: valore ‘=:ero 0 RETURN 





Reggio 
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<]g - CO 


RETE costruisce una rete planare ma, invece di specificare ogni vertice come per il comando 
SDRETE, basta specificare solo i 4 vertici estremi e le dimensioni M e N della rete. Le posizioni 


< dei vertici intermedi vengono calcolate automaticamente. 


Comando: RETE 

Primo vertice: immettere pUunio 
Secondo vertice: immerlere punio 
Terzo vertice: immettere punio 
Quarto vertice: immelere punto 
Dim M rete: valere Iniero 

Dim N rete: valore jnsero 


Le dimensioni M e N della rete informano 
AutoCAD sul numero di linee da disegnare 
in ogni direzione lungo la rete; occorre 
fornire un numero intero tra 2 e 256 in 
entrambi i casi. AutoCAD evidenzia gli 
spigoli in questione per far riconoscere le 
direzioni M e N. 





Bisogna selezionare i quattro vertici in senso orario o antiorario, altrimenti la rete risultante si 
intersecherà con sè stessa e il risultato sarà come nella figura a destra. 


UR 


Questo comando costruisce piramidi a tre 0 Quanro facce. Potete scegliere scegliere se le facce 


laterali della piramide devono incontrarsi in un unico punto (apice) oppure specificare tre 0 
quattro punti per formare una faccia superiore. Le facce laterali di una piramide 2 base 
quadrata possono incontrarsi anche lungo una cresta definita da due punti. Notate che l'altezza 
dell'apice, della faccia superiore o della cresta della piramide è determinata dal valore della Z 


dei punti forniti. 


Comando: PIRAMIDE 

Primo punto base: immezere punto 

Secondo punto base: Immettere punto 

Terzo punto base: jmme:lere punito 
Tetraedro/<Quarto punto base>: punto Oppure ZI 


Se rispondente con “Tetraedro” all'ultima richiesta, AutoCAD presenta il seguente messaggio: 


Faccia superiore/<Punto apice>: punio oppure "ES 


Se rispondete con un punto, AutoCAD genera una piramide a tre facce che si incontrano in un 
‘apice costituito da un solo punto. Se rispondente con “Faccia superiore” (0 "FS°), AutoCAD 


chiede i tre punti che specificano il poligono superiore. 


Se selezionate l'opzione "Quarto punto base” alla richiesta "Tetraedro/<Quarto punto base>:” 
viene presentata una serie di opzioni differenti 


Cresta/Faccia Superiore/<Apice>: 
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Le opzioni Faccia Superiore e Apice sono identiche a quelle relative al tetraedro. L'opzione 
“Cresta” chiede i due estremi della linea che formera la cresta della piramide. Tali punti devono 
essere immessi nella stessa direzione dei punti di base, il primo estremo deve cioè trovarsi sopra 
al primo punto di base in modo da evitare che la piramide si intersechi con sè stessa. Lo stesso 
vale per i punti da immettere il risposta ail'opzione Faccia Superiore. 


L'illustrazione seguente mostra l’effetto delle opzione "Cresta" e "Faccia Superiore" su una 
piramide a quattro facce laterali. I punti B1/B2 indicano l'ordine nel quale i punti di base sono 
stati selezionati (direzione antioraria). I punti R1/R2 e TI/T2 mostrano l'ordine (corrispondente 
a B1/B2) nei quale devono essere specificati i punti della cresta e della faccia superiore. 


Apice 
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Selezionare cresta (P1/22) 0 orimo vertice 
31 superiore \T1/T2) ner megezimo arcine 
ge cuni di base. 


Questo comando costruisce una sfera a rete poligonale. Si puo controllare il numero di segmenti 
generati ia ogni direzione sulla superficie della sfera. La sequenza di comando è ia seguente: 


Comando: SFERA 

Centro della sfera: immettere cunto 

Diametro/<Raggio>: distanza 0 °D" 

Numero dei segmenti longitudinali <16>: valore intero 0 3ETURN 
Numero dei segmenti iztitudinali <16>: vglore ero 0 RETURN 
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DA i S » 
Pe eva Reggie 
sin ie i 
À \ To ali 


\ A A 


A3LT TORO 


Questo comando genera Una rete poligonale di forma toroidale. ll tubo del toro è costruite 
ruotando un cerchio intorno ad una linea disegnata sul piano del cerchio e parallela all'asse Z 
corrente. Il centro del toro giace sul piano di costruzione corrente. 


Comando: TORO 

Centro del toro: immettere punito 
Diametro/<Raggio> del toro: distanza 0.2 
Diametro/<Raggio> del tubo: À = 


disionza o D 
Segmenti della circonferenza del tubo <16>: rgiore intero C RETURN 


Segmenti della circonierenza del toro <]6>: x jore intero. ETURN 


AutoCAD misura il raggio 0 il diametro del toro dal suo punto centrale al suo spigolo esserne. 


Potete specificare il numero dei segmenti da disegnarsi in ogni direzione. 
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3 N 


Questo comando definisce una rete 
poligonale in forma di cuneo con base ad 
angolo retto. Per prima cosa si comunica ad 
AutoCAD il punto d'origine del cuneo. Si 
specifica quindi la lunghezza, larghezza, 
zitezza e angolo di rotazione relativamente a 
guesto punto. 


Comando: CUNEO 

Vertice del cuneo: immettere runio 
Lunghezza: immettere sistonza 
Larghezza: immettere distanza 
Altezza:immeltere disenza 

Angolo di rotazione intorno all'asse Z: 


immertere angolo 


L'angolo di rotazione viene specificato 
relativamente al piano XY corrente; il punto 
di base della rotazione è il vertice del cuneo. 


lil 


' 
Raggio dei toro 
Lan 999 _—_— 





Raggio sel c:iinare : 


Altezza 


Vertice SO i 


Z= 
SS 


x 


RS 
“SX 
"9 Xi anta 
1014 


su 
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Il comando 3DARRAY crea serie rettangolari tridimensionali (se si specifica il numero di righe, 
di colonne e di livelli) o polari se si specifica un asse di rotazione. ' 


Comando: 3DARRAY x 
Selezionare oggetti: mostrare gli orsetti da copiare 
Serie rettangolare o polare (R/P): 


Se si sceglie l'opzione Rettangolare (0 solo “*R*), AutoCAD chiede il numero di righe, colonne e 
livelli che devono essere costruiti. Il valore standard per ognuna ‘(di queste opzioni è <1>. 


Numero di righe (---)<1>: 
Numero di colonne (---)<1>: 
Numero di livelli (---)<1>: 


Una serie rettangolare viene costruita riproducendo un elemento di base (cioe l'oggetto 
selezionato) ii numero di volte richiesto lungo gli assi X. Ye Z. Di conseguenza una serie in cui 
sia righe che colonne € livelli hanno valore | non ha senso è viene rifiutata dal programma. 


AutoCAD richiede poi la distanza tra una riga e l'altra e ripete la stessa richiesta anche ser le 
colonne e i livelli. 


Distanza le righe (---): 
Distanza le colonne (---): 
-. °° Distanza i livelli (---): 


Dopo che è stato specificato anche questo intervallo, AutoCAD comincia a disegnare la serie. Si 
può interrompere la costruzione prima che sia terminata immettendo CTRL C. 






Lair 
















adi - af yi 4 cito I 
5 veli 
grati 
s 
ez] Coin 
Fiemento ceo serie Serie è x 3 x 3 


Per creare una serie polare 3D. selezionate gli oggetti che devono essere riprodotti e rispondete 
al messaggio che appare quando viene scelta l'opzione "Polare" (0 "P"). ll messaggio richiede il 
numero di copie e l'angolo da riempire: 


Numero di copie: 
Angolo da riempire <360>: 


Digitare il numero di copie che formeranno la serie, compreso l'oggetto originale. Se selezionate 
più di un oggetto, considerate l'intero gruppo di selezione come un'unità). A differenza del 
comando SERIE di AutoCAD. non è ammessa una risposta nulla alla domanda "Numero dì 
copie:” 


112 





H 
4 
fi 
| 





AutoLIS? - (A) Programmi di AutoLISP 


“Angolo da riempire” informa AutoCAD di quanto la serie deve ruotare intorno al centro. 
Immettere un numero positivo per rotazioni in senso antiorario e un numero negativo ser 
rotazioni in senso orario. Per una serie circolare completa. scegliete ii valor standard <3605. 


Il prossimo messaggio di richiesta sara: 
Ruotare gii oggetti mentre vengono copiati? <S> 


Una risposta affermativa induce AutoCAD 2 disegnare ogni copia ruotata in accordo con 
l'angolo che forma con l'asse di rotazione. 


AutoCAD chiede ora di definire l'asse intorno al quale la serie dovra ruotare. Il comanco < 
AutoCAD SERIE genera una serie polare operando una rotazione intorno all'asse Z corrente. i 
comando SERIE3D permette invece di definire un nuovo asse Z temporaneo intorno ali quase i3 
serie verrà generata. 


Centro della serie: 
Secondo punto sull'asse di rotazione: 


Neil'illustrazione seguente, il punto centrale (P!) e ii secondo punto (P2) definiscono un asse 2 
temporaneo che giace sul piano NY corrente. L2 serie risultante e ruotata di 90 arci 
relativamente al piano XY. 





Questi file vengono forniti solo per le versioni di AutoCAD sono E -DOS/MS-DOS. Si tratta di 
versioni aggiornate di file normalmente distribuiti con AutoFlix!*!. Se siere utenti di AutoFiix. 
dovreste servirvi di queste versioni con AutoCAD Reilsase 10. 
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4 a x . R 


Questo comando inserisce file di testo in formato ASCII in disegni di AutoCAD. Potete 
specificare se il testo da inserirsi deve apparire a sinistra, 2 destra, centrato 0 in mezzo. Non 
viene presupposta nessuna estensione, se il file dispone di un'estensione. questa deve essere 
specificata esplicitamente. E° possibile anche specificare un prefisso d'elenco come in 
“/acad/sample.tx1" 0 "\\acad\\sample.tx1". La sequenza dei messaggi è la seguente: 


Comando: ASCTEXT 

File da leggersi (compresa estensione): immellere nome tile ; 
Punto iniziale 0 Centro/Mezzo/Destra: piumio Cc zieuare temere dallz icstiera 
Altezza estandara>: valore © RETUR N 

Angolo di rotazione <stendard>: gngolo o RETURN 


Cambio opzioni di testo? <N>: 257 “n° 0 RETURN 


Se rispondete all'ultima richiesta con RETURN, AutoCAD legge all'interno del file da voi 
specificato (se lo trova). Se rispondete invece con »5°. appaiono i messaggi di richiesta seguenti. 
Potete cambiare i valori per ogni opzione 0 rispondere con un RETURN per accettare il valore 
standard presentato. 


Distanza tra le linee(<Auto>): 

Prima linea da leggersi/<l>: 

Numero di linee da leggersi/<Tutte>: 
Sottolineare ogni linea? <N>: 

Sopralineare ogni linea? <N>: 

Tuttè le lettere MAiuscole/Minuscole/? <N>: 
Colonne? <N>: 


Se rispondete affermativamente all'ultima richiesta. AutoCAD vi chiederà )3 distanza tra le 
colonne e il numero di linee per colonna: 


Distanza tra colonne: immeliere gisianzo 
Numero di linee per co.onna: rale” intero 


Dopo che avete risposto a tutti questi messaggi. AutoCAD scriverà il testo. 


KIRI z_- Fi la 
Questo File viene fornito solo per le versioni di AutoCAD sotto PC-DOS/MS-DOS. Si tratta 
della versione aggiornata del file “ashade.isp" normalmente distribuito con AutoShade Mi Se 
siete utenti di AutoShade, dovreste usare questo file quando inserite apparecchi fotografici. luci 
o scene con la release 10 di AutoCAD. 1 messaggi di richiesta rimangono uguali a quelli riportati 
nel Manuale all'Uso di AutoShade. 


La nuova versione di ASHADE comprende un nuovo comando, APPVISTA. Questo comando 
può essere utilizzato con la release 10 di AutoCAD (con FLATLAND uguale a 0) per 
visualizzare il disegno visto in prospettiva da un apparecchio fotografico di AutoShade. 
APPVISTA chiede di selezionare l'apparecchio desiderato, basta puntare sull'apparecchio e dopo 
pochi istanti appare sullo schesmo il disegno come se fosse visto dall'obiettivo dell'apparecchio. 
Notate che APPVISTA genera ana vista prospettica. 
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1.6 ATTREDEF - Agg idefinizi . 


Questo comando permette di ridefinire un blocco e aggiornare gli attributi associati a precedenti 
inserimenti di tali blocco, Gli eventuali nuovi attributi vengono aggiunti ai parametri del blocco 
e ricevono i loro valori standard. Attributi preesistenti compresi nella nuova definizione di 
blocco: mantengono i loro valori. Attributi precedenti invece, che non sono più compresi nella 
nuova definizione vengono eliminati. 


Comando: ATTREDEE 
Nome del biocco da ridefinire: vecchio nome del Blocco 


Selezionare nuovo blocco ... 


Selezione oggetti: scegliere cli omperti che costituiranno il nuovo hlocco 
Punto di inserimento del nuovo blocco: immettere runto 


Se gli identificatori di entita sono attivi. nuovi identificatori vengono assegnati ad ogni 
parametro di blocco ridefinito. 


ARCO T_- Ricerca e costituzione di un rec 


Il comando CHGTEXT permette una elementare editazione ci entita di testo. Offre la possibilita 
di specificare una nuova stringa che puo sostituire una vecchia stringa trovata nell'ambito di 
entita di testo selezionare. Gli spazi sono signiricativi in entrambe le stringhe. 


Comando: CHGTEXT 

Selezioanre oggetti: selezionare il resto da considerare 
Vecchia stringa: immertere (estro da sostituire 

Nuova stringa: mmertere nuova (esta 


3 = Cancellazi i I j noia 
Questo comando permette di cancellare tutte le entità che si trovano su un piano specificato. 


Comando: DELLAYER 
Piano da cancellare: immettere nome del ciano 


DELLAYER si serve del meccanismo di filtro issget “X") ci AutoLISP per creare un gruppo di 
selezione comprendente tutte le entità sul piano specificato. Esegue poi il comando ELIMINA 
considerando il gruppo di selezione come l'entità da eliminare. Questo comando può essere 
facilmente modificato per permettere l'eliminazione di aitri gruppi di entita: ad esempio. è 
possibile implementare comandi per operare su tutte le entità di un determinato colore. un 
determinato tipo (ad es. cerchi) o tutte le entità di una certa elevazione. ‘Rimandiamo al 
comando SSX descritto in seguito). 





Questo comando permette di modificare interattivamente 12 visibilità degli spigoli delle facce 
tridimensionali. 


Comando: EDGE 
Visualizza/<Selezione lato>: 
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11 messaggio "Visualizza/<Selezioe lato>:" viene ripetuto finchè non viene fornita una risposta 
nulla. ciò permette di modificare la visibilità di più di uno spigolo con un solo comando. 
Selezionando uno spigolo, questo diventa automaticamente invisibile (se è invece già invisibile, 
torna ad essere visibile). Se gii spigoli di una 0 più facce si sovrappongono, la visibilità di ogni 


spigolo sovrapposto De risulta alterata. 


* possibile modificare solo le caratteristiche di spigoli visibili. L'opzione *Visualizza” evidenzia 
gli spigoli invisibili di una 0 più facce 3D. infatti potete procedere all'editazione di uno spigolo 
soio se riuscite a vederlo. Se volete rendere visibili tutti gli spigoli invisibili prima di procedere 
al comando EDGE, potete assegnare alla variabile di sistema SPLFRAME valore 1. 


z 
KI L N versi ta 


I comando di AutoCAD ESPLOSO posiziona le entità di tratteggio e quotarura sul piano 0. 
Questa versione alternativa del comando ESPLOSO colloca tali entità sul medesimo piano 
dell'entità originale. 


Comando: LENP 
Selezionare blocco di riferimento. polilinea, quota 0 rete: eseguire 


AutoCAD riporta il nome del piano sul quale sono state collocate le nuove entità. 


K) - i i relativi 


Si tratta di una routine molto utile per ricavare UD PUNto relativo e può essere richiamata ogni 
volta che un comando di AutoCAD richiede un punto. Basta digitare REF in risposta ad un 
messaggio di richiesta riguardante Un punto e immettere il punto di base (di Riferimento) 
desiderato e lo spostamento relativo 0 polare rispetto questa base. Ad esempio: 


- Comando: LINEA 
Dai punto: punto PI 
Al punto: (ref) 6:.2 035 
Punto di riferimento: cunto Pi 
Immettere coordinata relativa/polare tcon @)x @Li 
AI punto: mmuo Pi 
Al punto: 





Come vedete nella figura, questa sequenza 
crea una coppia di linee che si incontrano in 
un punto spostato di | unità X e 2 unità Y 
dal punto di riferimento (P2). 





Solitamente si richiama SETUP (in italiano IMPOST) dal menù di schermo di AutoCAD. Questo 
comando imposta le unità di disegno e i limiti di un nuovo disegno sulla base delle dimension: 
del foglio e del fattore scalare da voi sceito. La routine termina disegnando un bordo formato da 
un linea semplice per permettere un migliore orientamento all'interno dei limiti del disegno. 
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2 -_ Versi ji il "o* 


Questa routine fornisce una maniera pratica di selezione entità sulla base del tipo, del colore, 
tipo di linea, piano, nome dei blocco, stile di testo e altezza. Ad esempio potete usare SSX per 
selezionare tutte le linee di colore verde. Potete richiamare SSX in risposta al messaggio di 
richiesta “Comando:", come illustrato sotto. oppure in risposta ad ogni messaggio che richiede la 
selezione di oggetti. 


Comando: (<sx) 
>> Nome del blocco/Colore/Entita,Piano, Tipolinea/Stile/Altezza: 
A 
Se si seleziona un'opzione. AutoCAD richiede il valore da immettere. Il messaggio di richiesta 
principale viene ripetuto finchè non si fornisce una risposta nulla; AutoCAD quindi esamina il 
disegno alla ricerca delle entità che rispondono ai criteri definiti. (E' ovvio quindi che si puo 
specificare un solo valore per ogni opzione). 


Se richiamare SSX in risposta a "Comando:”. potete utilizzare il nuovo gruppo di selezione 
immettendo "P° (o "Precedente") al prossimo messaggio di selezione oggetti. Se rispondete con 
SSX al messaggio di selezione oggetti il nuovo gruppo di selezione viene passato direttamente al 
comando in attesa. Nell'esempio seguente SSX e stato richiamato durante il comando SPOSTA. 


Comando: SPOSTA 

Selezionare oggetti: (ssx) 

>> Blocco/Colore/ Entita/Piano, Tipolinea/Stile/Altezza: E 
>>Tipo di entità: Linea 

>> Blocco, Colore; Entitè/Piano/ Tipolinea/Stile/ Altezza: C 

>> Numero colore: | 

>>»Blocco/Colore/ Entità/Piano/ Tipolinea/ Stile/ Altezza: RETURN 
fi trovato im: l 


Selezionare oggetti: RETURN 
Punto di base o spostamento: ... 


Entità rossono disporre di un proprio colore e tipo di linea oppure possono ereditare queste 
caraueristiche dal piano sul quale giacciono | coiore e tipolinea “DA PIANO"). SSx indivua entità 
con un coiore e un tipo di linea specifica: soio se queste caratteristiche sono stcie assegnate 
Lil'entue individucimente. 


I programmi di AutoLISP contenuti nei dischetto "Bonus" hanno lo scopo di dimostrare le 
possibilità di AutoLISP e di illustrare i metodi di cui servirsi per scrivere i programmi in 
AutoLISP. Benchè la maggior parte di questi programmi eseguano compiti piuttosto utili, non 
sono provvisti di funzioni per la verifica dell'immissione esatta o di situazioni di errore e le 
routine non sono così perfette come negli esempi precedenti. Si invitiamo quindi a esaminare il 
file sorgente di questi programmi per modificarli 0 estenderli, se lo desiderate. I capitoletti 
seguenti descrivono brevemente questi programmi modello. 
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Questa routine ruota una 0 più entità di un numero di gradi specificato intorno agli assi X, Ye 
Z. Potete realizzare una serie di rotazioni premendo RETURN per ripetere il comando ROTAS 
e immettere "P* (per "Precedente") al messaggio di richiesta “Selezione oggetti”. 


Comando: AXROT 

Selezionare oggetti: ereguire 

Assi di rotazione X/Y/Z: 2 TY 0 ro 
Angolo di rorazione <>: vglore. 0 RETURN 
Punto base <0, 0. 0>: ruo.o RETURN 


42 A - iv 


Questa routine fornisce un metodo per spostare i vertici di una faccia 3D. E° particolarmente 
utile nei casi in cui due vertici si sovrappongono (come in una faccia 3D di tipo triangolare) e 
desiderate spostarne uno. Potete selezionare il vertice desiderato tramite puntamento o tramite 


l'ordine (primo, secondo. esc.) in CUI i vertici sono stati immessi. 








Comando: CAMFAC 
Selezionare entità da cambiare: eseguire 
1/2/3/4/Annulla/V isualizzazione/<Selezionare vertici»: 


43 è i î 
Questa routine costruisce una coppia di linee centrali passanti per il centro di un cerchio. CL 
disegna queste linee in modo che siano parallele all'UCS corrente al momento della costruzione 
del cerchio e le pone su un piano *CL° (creando questo piano se già non esiste). 


Comando: CL 

Selezionare arco o cerchio: eseguire 
Raggio è nnn 

Lunghezza/<Estensione>: disanzg 071° 


Se immettete "Lunghezza" (o semplicemente "L"). AutoCAD chiede di specificare la lunghezza di 
un braccio della linea centrale; una linea elastica viene attaccata al centro del cerchio e la riga 


monitor di AutoCAD fornisce cn conto progressivo della distanza. Altrimenti potete immettere il 
valore della distanza alla quale le linee centrali si estendono al di fuori della circonferenza del 


cerchio. 


di wW MIS emoi i i i 


Se utilizzato con il disegno modello REVINFO, questo programma implementa un sistema 
rudimentale di controllo e revisione del disegno. E° stato fornito per scopi puramente illustrativi. 
per mostrarvi ciò che potete fare servendovi dei gestori di entita € di una piccola porzione di 
AutoLISP. Questo programmino non ha la pretesa di essere nè un gestore di disegni 


multifunzionale né la base per l'impiementazione di un tale gestore. 


nere tarli 
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Dopo aver caricato il programma, potrete scegliere tra i comandi seguenti: 

LOGON Domanda un chiave d'accesso, cioe il vostro nome. un numero ECO 
(Engineering change order) e commenti di vario tipo. Se già era presente 
un'altra chiave, questa viene automaticamente annullata. 

LOGOUT Annulla la vostra chiave d'accesso. 


END Ridefinisce il comando FINE di AutoCAD in modo tale che venga annullata la È 
chiave d'accesso di utenti attivi, nel caso ne esistessero. 


RLIST Presenta una lista di tutte le revisioni apportate al disegno. 

FINGER Richiede di puntare su un'entità. Informa su chi ha creato l'entità, quando. 
quale ECO è stato aggiunto ed eventuali commenti relativi alla revisione in 
Questione. 

SELUSER Richiede il nome di un utente. Evidenzia tutte le entità del disegno che sono 
state aggiunte da questo utente. Premendo un tasto di funzione. tali entita 
vengono posizionate all'interno di un gruppo di selezione "Precedente" in modo 
che possiate operare su di esse con altri comandi di AutoCAD. 

SELECO Richiede un numero ECO. Evidenzia tutte le entità nei disegno relative a tale 
ECO. Premendo un tasto di funzione. tali entità vengono  nosizionate 
all'interno di un gruppo di selezione "Precedente" in modo che possiate operare 
su di esse con altri comandi di AutoCAD. 

Le informazioni di controllo sulle revisioni sono memorizzate nel disegno sotto forma di blocchi 
con attributi invisibili sul piano "SREV®,  --; 0o 
d 3 jal» 


Questa routine illustra l'uso deila ricursione per calcolare il fattoriale di un intero. 


Comanco: FACT 


Immettere un intero: eseguice 


A16 F - Copia di ile di testo in un' 
Questo programma prende come argomenti il nome di due rile di testo ASCII e copia il primo 
file nel secondo. Se il primo file non esiste. viene visualizzato un messaggio di errore: se e 
invece il secondo file che non esiste, viene creato. Se ii secondo file è già esistente, guanto 
precedentemente conteneva viene sovrascritto. 

Comando: voti, rienz. li a] suivezione ext”) 


Questo programma è da wilizzarsi solo con Sile di testo ASCII. Non usatelo mai con file binari. 
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41 Ò o ita . x curia 


Questa routine genera una rete poligonale tridimensionale rappresentante i valori di una 
funzione a due variabili nell'ambito di un intervallo specificato di valori per le due variabili, 


con una risoluzione definita (specificata dal numero di suddivisioni all'interno dell'intervallo). 
quando richiamate FPLOT, dovete fornire quattro argomenti: 


Comando: < funzione? <IMerv > <inierv > <ri, sione>. 


< funzione> è la funzione che deve essere valutata. Solitamente si tratterà del nome tra virgolette 
di una funzione definita precedentemente o una definizione LAMBDA di una funzione. 


<intervallox> e <intervallov> sono liste che specificano l'intervallo per i valori X € Y 
rispettivamente. Îl primo elemento di ogni lista è il limite inferiore, il secondo elemento il limite 


superiore. 


crisoluzione> è un numero intero che specifica la risoluzione della rete approssimante la 
superficie definita dai valori della funzione che fungono da argomenti nell'intervallo specificato. 


Ad esempio. per riprodurre graficamente (es*(-(X®®2 + Y®®2))) in un intervallo da -2 a 2 per 
entrambi gli assi (con 20 tabuiazioni lungo ogni asse). digiterete: 


(fplot ire y) (exp (© (+ (tx x) (* Y v))))) 
‘(-2 2) 
20 

) 


Il risultato visualizzato cOn purio di vista pari a 1.-1.1 sarà una palla da tennis nascosta sotto Un 
tappeto. 





Potete riprodurre graficamente anche una funzione predefinita. Ad esempio: 


(defun cs (x y) 
{cos (sqrt (+ (* Xx * 2) ty y)))) 


) 
(visuale ‘es '(-20 20) 1(+20 20) 40) 
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x 


Il risultato sarà una serie di onde ellittiche, come Quelle che si generano uno stagno nei quale 
avete appena gettaro un sasso. 


Ì 
\ 
{ 
| 
I 


SAX rn e \ 
ZO eg EL P 













I 
| LG ( LATI " 


“QU Là DOZZA # 
ILE 97, ARA 
- Ue 7 
Dr, 


Il file "fpiot.lsp* contiene anche un caso predefinito più complesso. Se immettere: 


Comando: DEMO 


otterrete il modello d'interferenza di due onde cosinusoidali smorzate esponenzialmente. Questo 
esempio vi illustra la pluralità di superfici complesse che potete generare con una semplice 
definizione servendovi di FPLOT. 





Questa funzione presenta sullo schermo una lista di file di testo ASCII. Il passaggio allo schermo 
di testo non è automatico. 


Comando: (fprint “nometile.ax1”) 
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49 DI jezio 


Questa routine implement: 
cerchi, polilinee, poligoni 

per generare disegni di b. 
Informazioni relative all. 
considerazione. 





Questa routine ridefinisc 
È 


punti mediani dei suoi s 
in poligoni convessi di îc 


44 - Cala 
Questa routine si serve 
rappresentare Con Paiut 
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CHI —C i i spirali cz 


Costruisce una spirale bidimensionale dato un punto di base. la crescita per rotazione e i punti 
per cerchio. 


Comando: SPIRAL ‘ 
Punto centrale: immettere unto 

Numero di rotazioni: immelere numero 

Passo per rotazione: immettere dissonza 

Punti per rotazione: immetlere numern 


Impiementa una fuazione di radice quadrata in AutoLISP utilizzando il medesimo metodo di 
AutoCAD. 


Comando: (sar <numern>) 





Questa routine contiene un numero di funzioni che applicano le funzioni TBLNEXT è 
TBLSEARCH di AutoLISP. Le funzioni (piano), (tipolineai, (vista), (blocco), (stile), (ucs) è 
(finestra) possono essere chiamate indipencentemente. Ognuna elenca le entrate nella tavola di 
simboli associata. 2 richiesta in ordine aifabetico. Il comando TABLES chiama queste funzioni 
una dopo l'altra. 


Per le tavole relative ai piani, ai tipi di linea e agli stili di testo, un asterisco nella colonna uno 
indica l'impostazione corrente. Se il tipo di linea corrente è “DAPIANO", il tipo di linea 
corrispondente al piano corrente verrà segnata con una “L° nella colonna uno. 





Comando: TABLES o (nome delle :cvolal 
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Appendice B 


Messaggi di errore 


Quando AutoLISP individua una condizione di errore, cancella la funzione corrente e richiama 
la funzione *“ERROR® definita dall'utente con un messaggio indicante il tipo di errore. Se 
l'utente non ha definito nessuna funzione “ERROR” (*ERROR® è legato a NIL), verra 
visualizzato il formato generaie del messaggio d'errore cioè: 


error: messaggio 


seguito dalla traccia della funzione. Se esiste una funzione “ERROR® definita dall'utente questa 
viene richiamata con messaggio quale unico argomento. 


rrori nei 


Presentiamo una lista di messaggi di errore che possono apparire durante la creazione e la messa 
a punto di funzioni di AutoLISP. La maggior parte di questi messaggi messaggi indica tipici 
errori di programmazione in LISP come: 


=» nomi di funzione o di simboli scritti non correttamente 

m erroneo numero o tipo di argomenti di funzione 

m errori di parentesi 

= errori di virgolette (strighe non terminate) 

» l'esecuzione di una funzione non-é-ancora terminata e già si cerca di utilizzarne i 
risultati 


Benché questi messaggi indichino solitamente errori di programmazione da parte dell'utente. 
possono anche essere il risultato di imprecisioni nella programmazione originale di AutoLISP 
stesso. Se non riuscite ad identificare il possibile errore da voi commesso, vi preghiamo di 
riempire un foglio di descrizione del possibile errore interno ad AutoLISP e di spedirlo alla 
Autodesk AG. 


Atomiist modified after function swap (atomiist modificato durante paginazione attiva) 


Un'espressione ha modificato ATOMLIST. Ciò non e permesso mentre la funzione di 
paginazione VMON è attivata. 


AutoCAD rejected function ifunzione rifiutata da AutoCAD) 
Gli argomenti forniti a una funzione di AutoCAD non sono validi (esempio: SETVAR di 
una variabile di sistema "read-only" o TBLNEXT con un nome di tabelle non valido) 0 
la funzione stessa non è valida nel contesto corrente. Ad esempio, non si può usare una 
funzione GETxxx all'interno della funzione COMMAND. 


bad argument type (tipo di argomento scorretto) 


A una funzione è stato passato un argomento scorretto. ‘Ad esempio, non si può 
chiamare STRLEN con un intero.) 
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bad association list (lista delle associazioni scorretta) 
La lista fornita a ASSOC non consiste di liste *(chiave valore)”. 
bad entmod list (lista di ENTMOD scorretta) 


L'argomento passato a ENTMOD non è una lista appropriata di dati di entità (come 
quelle restituite da ENTGET). 


7 


bad entmod list value (valore scorretto di irsta ENTMOD) 


Una delle sottoliste nella lista delle associazioni fornita ad ENTMOD contiene un valore 
scorretto. 


bad formal argument list (lista di argomenti formali scorretta) 


Durante la valutazione di questa funzione. AutoLISP ha trovato una lista di argomenti 
formali non valida. Forse la funzione non e una funzione vera e propria. ma piutiosto 
una lista di dati. 

bad function (funzione scorretta) 
I) primo elemento della lista non è un nome di funzione corretto. Forse è il nome di una 
variabile o un numero. Questo messaggio può anche indicare che la funzione digitata non 


è stata definita correttamente; per es., se è stata omessa la lista degli argomenti formali 
richiesta. 


bad list (lista scorretta) 
A una funzione è stata passata una lista formata in modo scorretto. Ciò può succedere se 
un numero reale inizia con un punto decimale; in questo caso bisogna digitare uno zero 
davanti al punto. 

bad node inodo scorretto) 
Tipo di elemento non valido incontrato dalla funzione TYPE. 

bad node type in list (tipo di nodo scorretto nella lista) 


Tipo di elemento non valido incontrato dalla funzione FOREACH. 


bad point argument (argomento di punto scorretto) 
bad point value (valore di punto scorretto) 


Un punto (lista di due numeri reali) definito in modo scorretto è stato fornito 2 una 
funzione che richiedeva un punto. Non è permesso iniziare un numero reale con un 
punto decimale; in questo caso bisogna digitere uno zero davanti al punto. 

bad ssget list (lista SSGET scorretta) 


L'argomento passato a (SSGET “X") non è una lista di dati di entità appropriata (come 
restituito da ENTGET). 
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bad ssget list value (valore di lista SSGET scorretto) 


Una delle sottoliste nella lista delle associazioni fornita a (SSGET “X°) contiene un valore 
scorretto. 


base point is required (richiesto punto di base) 


La funzione GETCORNER è stata richiamata senza fornire l'argomento del punto di ‘ 
base. 


boole argl <0 or >IS 
I primo argomento della funzione BOOLE deve essere un intero compreso fra 0 e 15. 
can't evaluate expression (impossibile valutare l'espressione) 


Questo errore puo essere causato dalla collocazione scorretta di un punto decimale o da 
altre espressioni formare in modo scorretto. 


Can't open (file) for input -- LOAD failed (impossibile aprire il file di input -- LOAD non 
eseguibile) 


Il file fornito alla funzione LOAD non è reperibile o l'utente non ha accesso di lettura al 
file. 


Can't reenter AutoLISP (impossibile ritornare in AutoLISP) PTCIPERO, VSS 


Il buffer di comunicazione AutoCAD - AutoLISP è occupato da una funzione attiva, 
nessuna nuova funzione puo essere richiamata finchè la funzione non è completa. 


console break (*Annullato*) 

Una funzione in corso è stata interrotta mediante CTRL C. 
divide by zero (divisione per zero) 

La divisione per zero non è permessa. 
divide overflow (superamento dei limiti a causa di una divisione) 

La divisione per un numero moito piccolo ha prodotto un quoziente non valido. 
extra right paren (parentesi di chiusura supplementare) 

Sono state trovate una o più parentesi di chiusura supplementari. 
file not open (il file non è aperto) 

Il descrittore di file per operazioni I/O non è quello di un rile aperto. 
File read - insufficient disk space (lettura file - spazio su disco insufficente) 


NE 


Lo spazio di stringa è stato esaurito mentre si leggeva da un file. Vedi Capitolo 6. 
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File size limit exceeded (file troppo grande) 
UNIX) Un file ha superato i limiti di grandezza posti dal sistema. 


(solo per sistemi sotto 


Fioating-point exception (errore di virgola mobile) 

(solo per sistemi sotto UNIX) Il sistema operativo ha scoperto un errore nell'aritmetica 2 
virgola mobile. 
function cancelled (funzione annullata) 5 
L'utente ha digitato CTRL C in risposta a UN messaggio che sollecitava immissione di 
dati. 
function undefined for argument (argomento non è uno di quelli previsti dalla funzione) 


L'argomento passato a LOG o SQRT non rientra nella gamma dei valori permessi. 


function undefined for real (f unzione non definita per numeri reali) 


A una funzione che richiede un numero intero è stato fornito un numero reale. Esempio: 


(LSH val 1.2) 
improper argument (argomento scorretto) 


L'argomento di GCD è negativo o uguale a 0. 


ate object in îuzeida (funzione inadeguata) 


inappropri 
propriata è stata rilevata dal paginatore della 


Una funzione costruita in maniera inap 
funzione VMON. 
incorrent number of argument ‘numero di argomenti scorretto) 
Una funzione QUOTE esige solo un argomento, è stato invece fornito un numero 
superiore di argomenti. 
incorrect number of arguments 10 & fupetion (numero scorretto di argomenti di una funzione) 


Il numero degli argomenti per la funzione definita dall'utente non corrisponde al numero 


di argomenti formali specificati da DEFUN. 


incorrect request for command list data (richiesta scorretta di comando di liste dati) 


E° stata incontrata una funzione COMMAND, ma non può 
un'altra funzione. 


essere eseguita essendo attiva 


input aborted (input annullato) 


E° stato rilevato un errore 0 una condizione di fine file prematura che ha causato 


l'interruzione dell'input dal file. 
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AutoLISP - (B) Messaggi di errore 


insufficient node space (memoria nodale insuiîficiente) 
La memoria nodale "heap" non è sufficiente per eseguire l'azione richiesta. Vedi Cap. 6. 
insufficient string space (spazio di memoria per stringhe insufficiente) 


La memoria di “heap” non è sufficiente per gestire la stringa di testo specificata. Vedi 
Cap. 6. 


invalid argument (argomento non valido) 
Tipo di argomento scorretto o argomento fuori dalla gamma dei valori permessi, 
invalid character (carattere non valido) 
L'espressione contiene un carattere non valido. 
invalid dotted pair (coppia puntata non valida) 
Le coppie puntate sono liste speciali contenenti due elementi separati da una costruzione 


"spazio-punto-spazio”. Questo errore puo verificarsi quando si inizia un numero reale con 
un punto decimale: in questo caso bisogna digitare uno zero davanti al punto. 


invalid integer value (valore intero scorretto) 


E° stato incontrato un numero minore dell'intero più piccolo permesso o maggiore 
dell'intero più grande permesso. 


LISPSTACK overflow (superamento dei limiti di memoria) 
AutoLISP ha debordato al di fuori dello spazio di memoria ausiliaria. Ciò può essere 


dovuto ad un eccessivo ricorso 3 funzioni o a liste di argomenti di funzioni 
particolamente lunghe. Provate ad aumentare il valore cella variabile d'ambiente 


LISPSTACK. 
malformed list (lista costruita in modo erroneo) 

Una lista letta da un file è terminata prematuramente. 
malformed string (lista costruita in modo erroneo) 

Una stringa letta da un-file è terminata prematuramente. 


misplaced dot (punto posizionato erroneamente) 


Può verificarsi quando un numero reale inizia con un punto decimale: in questo caso 
bisogna digitare uno zero davanti al punto. 


nuil function (funzione nulla) 


Vi è stato un tentativo di valutare un funzione che ha definizione NIL. 
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quit / exit abort (interruzione dovuta a quit/exit) 


Questo è il risultato di un richiamo delle funzioni QUIT o EXIT, che attualmente non 
sono in uso in AutoL.ISP. 


too few arguments (non ci sono abbastanza argomenti) 
Ad una funzione predefinita non sono stati f orniti abbastanza argomenti. 
too many arguments (ci sono troppi argomenti) 


Ad una funzione predefinita sono stati forniti troppi argomenti. 


B.2_ Errori interni 


I seguenti messaggi di errore dovrebbero essere estremamente rari. Si tratta di messaggi che si 
riferiscono ad errori interni al programma AutoLISP stesso e dovrebbero essere comunicati alla 
Autodesk AG se si presentano. 


Bad argument to system call 


(Solo per sistemi sotto UNIX) Il sistema operativo ha individuato una chiamata di 
sistema scorretta generata da AutoL.ISP. 


Bus error 


(Solo per sistemi sotto UNIX) ll sistema operativo ha individuato un errore di bus. 
COMREG re-use overflow 
COMREG swapin failure 
COMREG swapout failure 


Si è verificato un errore di comunicazione AUtoCAD-AutoLISP durante la funzione di 
paginazione VMON. 


could not open page file 
Il file di paginazione della funzione VMON non può essere aperto. 


Doubie lock 
Doubie unlock 


Si è verificato un errore di comunicazione AutoCAD-AutoLISP durante la funzione di 
paginazione VMON. 


error swapping in function 
error swapping out function 


Si è verificato un errore di I/O durante ila funzione di paginazione VMON. 
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AutoLISP - (B) Messaggi di errore 


Hangup 


(Solo per sistemi sotto UNIX) Il sistema operativo ha individuato uan segnale di 
sospensione. 


Ilegai instruction 


(Solo per sistemi sotto UNIX) Il sistema operativo ha individuato un'istruzione macchina ’ 
scorretta. 


Segmentation violation 


(Solo per sistemi sotto UNIX) Il sistema operativo ha individuato un tentativo di 
indirizzo al di fuori dell’area di memoria di elaborazione 


-TIAFTT 1 Prali re i ici SAM INTV Ri TR ML 


unexpected signal ann 


(Solo per sistemi sotto UNIX) Il sistema operativo ha ricevuto un segnale inatteso. 
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